C:\test>copy con answers.txt y n ^Z 1 file(s) copied. C:\test>type tobeautomated.pl my $count = 0; while ($count < 2) { $count ++; print "Question? y/n: "; chomp(my $answer = <>); print "You said `$answer`\n"; } C:\test>type answers.txt | perl tobeautomated.pl Question? y/n: You said `y` Question? y/n: You said `n` C:\test>
In reply to Re: Automating user input
by BrowserUk
in thread Automating user input
by Nishchita
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |