summaryrefslogtreecommitdiff
path: root/opcode.pl
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2004-02-03 19:41:11 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2004-02-03 19:41:11 +0000
commit59f00321bbc2d04656a65e0e9ccbbd93a8708e71 (patch)
treec0f54dac647290fc40828259685a2859be908403 /opcode.pl
parent81e59e001862de98bd8263eb307b4c909c0b16b8 (diff)
downloadperl-59f00321bbc2d04656a65e0e9ccbbd93a8708e71.tar.gz
Implement "my $_".
p4raw-id: //depot/perl@22263
Diffstat (limited to 'opcode.pl')
-rwxr-xr-xopcode.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/opcode.pl b/opcode.pl
index dc5b66eea9..1fe1f3ca89 100755
--- a/opcode.pl
+++ b/opcode.pl
@@ -493,9 +493,9 @@ regcreset regexp internal reset ck_fun s1 S
regcomp regexp compilation ck_null s| S
match pattern match (m//) ck_match d/
qr pattern quote (qr//) ck_match s/
-subst substitution (s///) ck_null dis/ S
+subst substitution (s///) ck_match dis/ S
substcont substitution iterator ck_null dis|
-trans transliteration (tr///) ck_null is" S
+trans transliteration (tr///) ck_match is" S
# Lvalue operators.
# sassign is special-cased for op class