Re^3 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;
[download]

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.

-@rocks

Comment on Re^3 Input/Output through the Keyboard Select or Download Code

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: ", ( ($input2)-1 ), "\n"; }` [download] 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.	[reply] [d/l]

Replies are listed 'Best First'.

Re^4: Input/Output through the Keyboard
by peschkaj (Pilgrim) on Nov 25, 2002 at 17:28 UTC

#!/usr/bin/perl

$| = 1;

while( ) {
    print "Number, plz: ";
    $input = <>;
    chomp $input;
    print "\nOutput is: ", ( ($input*2)-1 ), "\n";
}
[download]

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

I am that better idiot.

[reply]
[d/l]