Myabe thi is not the best way but work fine.
Cya.

#!/usr/bin/perl

%mytable = ('1', chenge_request, '2', call_request, '3', both);

print "choose_table:\n ";
print "1) chenge_request\n";
print "2) call_request\n";
print "3) both\n";

$choose_request = <STDIN>;
chop($choose_request);

print "Your choose is $mytable{$choose_request}.\n";

Regards
Goffredo Saffioti.



Vema Venkata ha scritto:

dude still the problem persits...

pls advise

-----Original Message-----
From: Tassilo von Parseval [mailto:[EMAIL PROTECTED]
Sent: Monday, 15 September 2003 2:02 PM
To: [EMAIL PROTECTED]
Cc: Vema Venkata
Subject: Re: <STDIN>


On Mon, Sep 15, 2003 at 06:25:29PM +1000 Vema Venkata wrote:




I had rewritten as per ur suggestions but there is no prompt like this "choose Change_Request,call_req or Both?>#";

pls advise



print "choose Change_Request,call_req or Both?>#";
my$choose_table= <STDIN>; #user has to key in Change_Request,call_req,Both
chomp $choose_table;




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



Reply via email to