Select Code to Download

#!/your/perl/here
use strict;
...
{ 
    print "else3:  $rand\n"; 
}

elsif ( ( $rand < rand ) { print "elsif2: $rand\n"; }

syntax error at C:\if_elsif.pl line 12, near ")
{"

elsif ( $rand < _rand ) { print "elsif2: $rand\n"; }

Bareword "_rand" not allowed while "strict subs" in use at C:\if_elsif
+.pl line 7.

Argument "_rand" isn't numeric in numeric lt (<) at C:\Perl\perlmonks\
+if_elsif.pl line 7.