summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgs@consttype.org>2014-07-24 17:43:29 +0200
committerRafael Garcia-Suarez <rgs@consttype.org>2014-09-30 08:17:50 +0200
commit157fb5a14d10ed16ffc6ebfc43d2637a016fdfce (patch)
treeb2410287e269d41f3295678586e62ce4fa459188 /embed.fnc
parentf276fdad8f6660f36944c895587a7748585e4969 (diff)
downloadperl-157fb5a14d10ed16ffc6ebfc43d2637a016fdfce.tar.gz
Introduce the double-diamond operator <<>>
This operator works like <> or <ARGV>, as it reads the list of file names to open from the command-line arguments. However, it disables the magic-open feature (that forks to execute piped commands) : $ bleadperl -e 'while(<>){print}' 'echo foo |' foo $ bleadperl -e 'while(<<>>){print}' 'echo foo |' Can't open echo foo |: No such file or directory at -e line 1.
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc2
1 files changed, 1 insertions, 1 deletions
diff --git a/embed.fnc b/embed.fnc
index 5fa38e80b5..5de2f83d1d 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1056,7 +1056,7 @@ Apd |SV* |vnormal |NN SV *vs
Apd |SV* |vstringify |NN SV *vs
Apd |int |vcmp |NN SV *lhv|NN SV *rhv
: Used in pp_hot.c and pp_sys.c
-p |PerlIO*|nextargv |NN GV* gv
+p |PerlIO*|nextargv |NN GV* gv|bool nomagicopen
AnpP |char* |ninstr |NN const char* big|NN const char* bigend \
|NN const char* little|NN const char* lend
Apd |void |op_free |NULLOK OP* arg