Re^4: Is there a way to halt the program until an enter is pressed?

It just waits without printing the print statement,I mean it is already expecting a user input without printing the print statement.\

print "Press <Enter> to continue, or 'q' to quit: ";
my $input = <STDIN>;
exit if $input eq "q\n";
[download]

Comment on Re^4: Is there a way to halt the program until an enter is pressed? Download Code

Replies are listed 'Best First'.
Re^5: Is there a way to halt the program until an enter is pressed? by GrandFather (Saint) on Mar 14, 2011 at 00:43 UTC
You may be Suffering from buffering. Try setting the $\| special variable to 1 (see perlvar). True laziness is hard work	[reply]
Re^6: Is there a way to halt the program until an enter is pressed? by Anonymous Monk on Mar 14, 2011 at 00:47 UTC
Can you advise where should I set $\| to 1,right before the print statement?	[reply]
Re^7: Is there a way to halt the program until an enter is pressed? by GrandFather (Saint) on Mar 14, 2011 at 00:50 UTC
I can, but I'm disinclined to acquiesce to your request. Go read the documentation I pointed you at or try it out in a test script (or both). Either way you'd have an answer before you received this reply. True laziness is hard work	[reply]
Re^8: Is there a way to halt the program until an enter is pressed? by Anonymous Monk on Mar 14, 2011 at 01:05 UTC
Re^9: Is there a way to halt the program until an enter is pressed? by Anonymous Monk on Mar 14, 2011 at 01:10 UTC
Re^9: Is there a way to halt the program until an enter is pressed? by GrandFather (Saint) on Mar 14, 2011 at 01:13 UTC