A „($temp =~ /^random$/i)”-ra értettem, de kb. általánosíthatnám mindenre, ahol nincs szükség regexpre.
Amit írtam, az pedig szerintem tökugyanaz:
$flag = ($temp =~ /^random$/i) ? 1 : 0;
if ($flag) {
&random_color;
} elsif ($temp eq "\n") {
&random_color;
}
===
if (($temp =~ /^random$/i) || ($temp eq "\n")) { &random_color; }
… mondjuk nagyon nem értek a Perlhez, de értelmében szerintem nincs különbség.
int getRandomNumber() { // ←ez itt már az aláírásom
return 4;//szabályos kockadobással választva.
} //garantáltan véletlenszerű. xkcd