print "Enter num1\n"; my $num1 = <STDIN>; chomp ($num1); print "Enter num2\n"; my $num2 = <STDIN>; chomp($num2); while($num2 > $num1) { print "Enter num again\n"; my $num = <STDIN>; chomp($num); $num1 = $num2; $num2 = $num; } print "Num2 is smaller than Num1\n";
In reply to Re: Any tips on this?
by simmisam
in thread Any tips on this?
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |