You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
@a = (0 .. 20);
|
|
@b = (-10 .. 10);
|
|
|
|
DIVISION: while (@a) {
|
|
$a = pop @a;
|
|
$b = pop @b;
|
|
|
|
next DIVISION if ($b == 0);
|
|
print "$a / $b = " . $a / $b . "\n";
|
|
}
|