Select Code to Download

$ uname -a
Darwin ganymede.local 16.6.0 Darwin Kernel Version 16.6.0: Fri Apr 14 
+16:21:16 PDT 2017; root:xnu-3789.60.24~6/RELEASE_X86_64 x86_64 i386 M
+acPro5,1 Darwin
...
alias perle='perl -Mstrict -Mwarnings -Mautodie=:all -E'
$ ls not_a_file
ls: cannot access 'not_a_file': No such file or directory

$ perle 'use Carp::Always; die "arghh"'
arghh at -e line 1.
...
$ perl -Mstrict -Mwarnings -E 'sub f { open my $fh, "<", "not_a_file" 
+}; sub g { f }; g;'
$ perl -E 'sub f { open my $fh, "<", "not_a_file" }; sub g { f }; g;'
$

$ alias perle
alias perle='perl -Mstrict -Mwarnings -Mautodie=:all -MCarp::Always -E
+'

$ perle 'sub f { open my $fh, "<", "not_a_file" }; sub g { f }; g;'
Can't open 'not_a_file' for reading: 'No such file or directory' at -e
+ line 1
    main::open(GLOB(0x7fb28e80f750), "<", "not_a_file") called at -e l
+ine 1
    main::f() called at -e line 1
    main::g() called at -e line 1