perl -le 'print $];'