perl -e 'print "$]\n";'