Select Code to Download

#!/your/perl/here

...
{
    print "else 4: $rand\n";
}

C:\Perl\perl\perlmonks>perl -d skip_elsif.pl

...
main::(skip_elsif.pl:22):               print "else 4: $rand\n";
  DB<2>
else 4: 0.63232421875