Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: Re: Re: redirecting stdin on windows

by myocom (Deacon)
on Aug 21, 2002 at 16:36 UTC ( #191787=note: print w/replies, xml ) Need Help??


in reply to Re: Re: redirecting stdin on windows
in thread redirecting stdin on windows

Funny, it works for the following (on WinXP):

script.pl
print "username: "; chomp ($uname = <STDIN>); print "\npassword: "; chomp ($password = <STDIN>); print "\nYou entered username $uname and password $password\n";
answer.txt
someusername somepassword
And I'm calling it like this:
perl script.pl < answer.txt
...which produces this:
C:\test\scratch>perl script.pl < answer.txt username: password: You entered username someusername and password somepassword
...which is the expected output.
"One word of warning: if you meet a bunch of Perl programmers on the bus or something, don't look them in the eye. They've been known to try to convert the young into Perl monks." - Frank Willison

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://191787]
help
Chatterbox?
[Lady_Aleena]: cPanel is a sponsor of meta::cpan?
[Lady_Aleena]: The default perl on the version of cPanel my web hosts uses is 5.8.8 which means I am dreadfully behind. I doubt perl 6 will hit my web host in my lifetime.

How do I use this? | Other CB clients
Other Users?
Others meditating upon the Monastery: (7)
As of 2017-05-29 09:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?