diff options
Diffstat (limited to 't')
| -rw-r--r-- | t/pragma/warn/toke | 17 |
1 files changed, 9 insertions, 8 deletions
diff --git a/t/pragma/warn/toke b/t/pragma/warn/toke index 6adddfc800..242b0059fb 100644 --- a/t/pragma/warn/toke +++ b/t/pragma/warn/toke @@ -450,6 +450,7 @@ $a = 1__23; print "$a\n"; $a = 12.3__4; print "$a\n"; $a = 12.34e1__2; print "$a\n"; EXPECT +OPTIONS regex Misplaced _ in number at - line 6. Misplaced _ in number at - line 11. Misplaced _ in number at - line 16. @@ -503,10 +504,10 @@ _123 123456000000000 123456000000000 123456000000000 -1.23456e-10 -1.23456e-10 -1.23456e-10 -1.23456e-10 +1.23456e-0?10 +1.23456e-0?10 +1.23456e-0?10 +1.23456e-0?10 123 12.34 12340000000000 @@ -543,10 +544,10 @@ _123 123456000000000 123456000000000 123456000000000 -1.23456e-10 -1.23456e-10 -1.23456e-10 -1.23456e-10 +1.23456e-0?10 +1.23456e-0?10 +1.23456e-0?10 +1.23456e-0?10 123 12.34 12340000000000 |