Re^4: perl -pi -e s'/^\s+//'g $file

in reply to Re^3: perl -pi -e s'/^\s+//'g $file
in thread perl -pi -e s'/^\s+//'g $file

Actually ARGV::readonly isn't needed with -i.orig (or -pi.orig) because perl does a stat first

$ perl -pe 1  "echo shabba|"
shabba

$ perl -Tpe 1  "echo shabba|"
Insecure $ENV{PATH} while running with -T switch.

$ perl -Tpi.orig -e 1  "echo shabba|"
Can't open echo shabba|: Invalid argument.
[download]

Happens around http://perl5.git.perl.org/perl.git/blob?f=doio.c#l897

Comment on Re^4: perl -pi -e s'/^\s+//'g $file Download Code

In Section Seekers of Perl Wisdom