if (defined($conf{Hier}) {
    AskQuestion("Enter mode", my @hier = qw/inquiry smart yes/,
$conf{Hier});
}
else {
    AskQuestion("Enter mode", my @hier = qw/inquiry smart yes/);
}

sub AskQuestion {
     my $prompt = shift;
     my @answers = @_;

     if(defined($_[2])) {
          my $test = $_[2];
     }

     rest of sub here...

}

-James


-----Original Message-----
From: Steven M. Klass [mailto:[EMAIL PROTECTED]]
Sent: Friday, February 15, 2002 2:40 PM
To: [EMAIL PROTECTED]
Subject: A pinch more help - before the weekend


Hi all,

        Ok expanding on our previous function

AskQuestion("Enter mode", my @hier = qw/inquiry smart yes/, $conf{Hier});

sub AskQuestion {
  my $prompt = shift;
  my @answers = @_;
  my $test = $_[2];
}

The last variable passed is not a sure thing - in other words if it exists
it
passes it, if not it won't be passed.

My question is since $test pulls "yes" instead of what ever is held by
$conf{Hier}, how can I get the variable $conf{Hier} if it exists.


--

 Steven M. Klass
 Physical Design Manager

 National Semiconductor Corp
 7400 W. Detroit Street
 Suite 170
 Chandler AZ 85226

 Ph:480-753-2503
 Fax:480-705-6407

 [EMAIL PROTECTED]
 http://www.nsc.com


--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to