diff options
Diffstat (limited to 'contrib/perl5/t/op/context.t')
-rwxr-xr-x | contrib/perl5/t/op/context.t | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/contrib/perl5/t/op/context.t b/contrib/perl5/t/op/context.t deleted file mode 100755 index 4625441..0000000 --- a/contrib/perl5/t/op/context.t +++ /dev/null @@ -1,18 +0,0 @@ -#!./perl - -$n=0; - -print "1..3\n"; - -sub foo { - $a='abcd'; - - $a=~/(.)/g; - - $1 eq 'a' or print 'not '; - print "ok ",++$n,"\n"; -} - -$a=foo; -@a=foo; -foo; |