diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-01-06 18:11:22 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2004-01-06 18:11:22 +0000 |
| commit | 800633c3daced5882d77eb7f133a700d5838565e (patch) | |
| tree | d7e3829e4d8c863840aa9983bd8574d0aba65629 /t/run/switch0.t | |
| parent | 2b712af56b0b0dbe19e312dacbdd227fb3dad324 (diff) | |
| download | perl-800633c3daced5882d77eb7f133a700d5838565e.tar.gz | |
Fix bug #24813 : the -0 wasn't recognized on the #! line
p4raw-id: //depot/perl@22082
Diffstat (limited to 't/run/switch0.t')
| -rw-r--r-- | t/run/switch0.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/run/switch0.t b/t/run/switch0.t new file mode 100644 index 0000000000..9919e1231a --- /dev/null +++ b/t/run/switch0.t @@ -0,0 +1,3 @@ +#!./perl -0 +print "1..1\n"; +print ord $/ == 0 ? "ok 1\n" : "not ok 1\n"; |