thanx raghavan now it is working rgds venkat
-----Original Message----- From: Sudarshan Raghavan [mailto:[EMAIL PROTECTED] Sent: Monday, 15 September 2003 3:26 PM To: [EMAIL PROTECTED] Subject: Re: <STDIN> Vema Venkata wrote: >dude still the problem persits... > This certainly seems like a buffering problem, the $| solution should work. Does your script or any of the modules that you are using selecting another filehandle (perldoc -f select, 1 argument form of select). The value of $| will affect the currently selected output channel (STDOUT is selected by default). All the print statements will also be directed to this output channel by default. > >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; >> >> > >Maybe this is a buffering problem. Try > > $| = 1; # turns on autoflush > print "choose Change_Request,call_req or Both?>#"; > chomp(my $choose_table= <STDIN>); > >Tassilo > > -- 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]