diff options
Diffstat (limited to 't/lib/strict/subs')
| -rw-r--r-- | t/lib/strict/subs | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/t/lib/strict/subs b/t/lib/strict/subs index c18af684f5..e8e132462d 100644 --- a/t/lib/strict/subs +++ b/t/lib/strict/subs @@ -408,3 +408,17 @@ system(FOO . "\n"); EXPECT Bareword "FOO" not allowed while "strict subs" in use at - line 4. Execution of - aborted due to compilation errors. +######## +# commit 984f9f66477bc722578262ae8520584e44e881af broke this parsing +use strict 'subs'; +my @players; +sub _rankCompare { } +@players = sort(_rankCompare @players); +EXPECT + +######## +# commit 984f9f66477bc722578262ae8520584e44e881af broke this parsing +use strict; +readline(STDIN); +EXPECT + |