almr has asked for the wisdom of the Perl Monks concerning the following question:
Dear Monks
it's never been quite clear to me how to get full -E behavior with a stdin script. Let's call perl from a shell script (this the reason for not wanting -E, and some other choices):
perl -Mv5.12 -wn -- - /etc/passwd <<'EOF' next unless / ([^:]*) : [^:]* : ([0-9]+) /x; my ($w, $n) = (uc $1, 5000 + $2); say qq{log=$w id=$n} EOF
As I understand it, -E turns on optionals (e.g. say, <<>>), but also some behaviors (e.g. use strict, Unicode handling). Now the unpalatable choices become
- specify a "minimal minimum" version (e.g. -Mv.5.12) to get say and strict; but that probably disables post-5.12 changes
- specify a "maximal minimum" version (e.g. -Mv5.28), but that fails for older Perls
- use -E with an inline single- / double-quoted shell string, with all the niceties of shell quoting / escaping
- use -E with a wastefull -E "$(cat <<"EOF" ... )"
Are there any other options to get -E behavior without -E?
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: -E behavior with stdin script (updated x2!)
by haukex (Archbishop) on Sep 05, 2021 at 07:42 UTC | |
by almr (Sexton) on Sep 05, 2021 at 09:28 UTC | |
by NERDVANA (Deacon) on Sep 05, 2021 at 13:03 UTC | |
by haukex (Archbishop) on Sep 05, 2021 at 13:53 UTC | |
Re: -E behavior with stdin script
by salva (Canon) on Sep 05, 2021 at 11:51 UTC | |
by haukex (Archbishop) on Sep 05, 2021 at 13:50 UTC | |
Re: -E behavior with stdin script
by BillKSmith (Monsignor) on Sep 05, 2021 at 12:58 UTC | |
Re: -E behavior with stdin script
by ikegami (Patriarch) on Sep 05, 2021 at 19:15 UTC | |
Re: -E behavior with stdin script
by Anonymous Monk on Sep 05, 2021 at 14:31 UTC |
Back to
Seekers of Perl Wisdom