0:24 >perl -Mstrict -MReadonly -wE "Readonly my $g => 30; Readonly my $s => 3000; print $s/5/20/$g;"
1
 0:25 >