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

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):
print "username: "; chomp ($uname = <STDIN>); print "\npassword: "; chomp ($password = <STDIN>); print "\nYou entered username $uname and password $password\n";
someusername somepassword
And I'm calling it like this:
perl < answer.txt
...which produces this:
C:\test\scratch>perl < 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?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://191787]
[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
Find Nodes?
    Voting Booth?