Help for this page
$ perl -Mwarnings -Mstrict -e'BEGIN { *! = \1; open my $fd, "< nonexis +tent"; print "$!\n"; }' 1
$ perl -e'$! = 1; print "$!\n"' Operation not permitted