print $_ if $_ % 2 while ; # not legal in Perl, but in pseudo-BASIC-PLUS