Perl programming on MPE/iX - April 2002

Solution Symposium Page 10April 4, 2002
simple statements
terminated with a semicolon
may be followed by one optional modifier
if EXPR
unless EXPR
while EXPR
until EXPR
foreach EXPR
$os = 'mpe';
$os = 'mpe' if $model == 3000;