4.4BSD/usr/src/contrib/perl-4.036/atarist/test/err
$! = 0 + 0; print $!, "\n"; $e = $! + 0; print $e, "\n";