my$i=32;$i=42 if $*IN.get~~/^\*/;say $i