Learning from Perl Golf (II) 

use English;
$_ equiv $ARG;
$/ equiv $INPUT_RECORD_SEPARATOR;
$\ equiv $OUTPUT_RECORD_SEPARATOR;
$| equiv $OUTPUT_AUTOFLUSH;
$@ equiv $EVAL_ERROR;