diff options
| author | Brian Fraser <fraserbn@gmail.com> | 2013-03-05 18:18:49 -0300 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2013-03-06 15:02:40 -0700 |
| commit | 32833930e32dc619abdaaab54e88de2a2765fb86 (patch) | |
| tree | bc62cb58783345a85e7a8069cfabbbcbe42e8a2f /t/lib | |
| parent | 07f7264624e0307ed32e3b140ef2a0ea9d86a07f (diff) | |
| download | perl-32833930e32dc619abdaaab54e88de2a2765fb86.tar.gz | |
Restrict the valid identifier syntax, fix some identifier bugs.
Fixes:
* Length-one identifiers are now restricted to
[\p{XIDS}\p{POSIX_Punct}\p{POSIX_Digit}\p{POSIX_Cntrl}]
plus, if under 'no utf8', the 128 non-ASCII characters in the
Latin1 range.
* Identifiers that start with ASCII letters can be followed with
XIDC characters
(The committer made some small edits in the pod)
Diffstat (limited to 't/lib')
| -rw-r--r-- | t/lib/croak/op | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/t/lib/croak/op b/t/lib/croak/op index 86e40f8e95..22f1e7621b 100644 --- a/t/lib/croak/op +++ b/t/lib/croak/op @@ -5,14 +5,6 @@ EXPECT Can't use global $! in "my" at - line 1, near "my $!" Execution of - aborted due to compilation errors. ######## -# NAME my $<special_unicode> -use utf8; -BEGIN { binmode STDERR, ":utf8" } -my $♠; -EXPECT -Can't use global $♠ in "my" at - line 3, near "my $♠" -Execution of - aborted due to compilation errors. -######## # NAME OP_HELEM fields package Foo; use fields qw(a b); |