$ perl -le'print $!=13'
Permission denied