Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re^3 Input/Output through the Keyboard

by @rocks (Scribe)
on Nov 13, 2002 at 06:24 UTC ( #212503=note: print w/replies, xml ) Need Help??

in reply to Re: Re: Re: Input/Output through the Keyboard
in thread Input/Output through the Keyboard

Hmm... This is interesting. I was thinking more on the lines of something that had to do with foreach except only dealing with the one variable you enter because of course your only enter one line. Something like:?

#!/usr/bin/perl<P> $input=<>; foreach $input++1;
but of course that doesn't work! I need to use foreach on arrays not scalars and I think I messed up the foreach thing too. A programmer told me that  evalis a module? I don't want to use modules.


Replies are listed 'Best First'.
Re^4: Input/Output through the Keyboard
by peschkaj (Pilgrim) on Nov 25, 2002 at 17:28 UTC
    eval() is part of the standard distribution of PERL.

    If you wanted to allow the program to keep running until the user exits you could use something like this:

    #!/usr/bin/perl $| = 1; while( ) { print "Number, plz: "; $input = <>; chomp $input; print "\nOutput is: ", ( ($input*2)-1 ), "\n"; }
    That seemed to work on my system.

    If you make something idiot-proof, eventually someone will make a better idiot.
    I am that better idiot.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://212503]
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others studying the Monastery: (5)
As of 2023-11-28 19:07 GMT
Find Nodes?
    Voting Booth?

    No recent polls found