I’m sure I could get flamed for this, but I just successfully wrote my first
program! Yaaahhh!

############## perl ############

#!c:/perl/bin/perl -w

print STDOUT "Enter a number:  ";
chop($number = <STDIN>);
print STDOUT "Enter a multiplier:  ";
chop($mult = <STDIN>);
$result = $number * $mult;
print STDOUT "The result you ignorant fool is: $result\n";


Cool, huh?  Not gonna win any awards, but at least I know how to use STDIN
and STDOUT.

Reply via email to