diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2013-08-03 23:08:42 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2013-08-03 23:41:21 -0700 |
| commit | 9dbc968d1a9a9f1e73f1da3d0cd81229c81b27ab (patch) | |
| tree | 526304414bd5110a45fd13c04289ba11b7a9c4a3 /lib/utf8.t | |
| parent | 9a0a8507578c570661730c652a2ff084dd3b9fe9 (diff) | |
| download | perl-9dbc968d1a9a9f1e73f1da3d0cd81229c81b27ab.tar.gz | |
Test that __PACKAGE__ is read-only
I.e., test that this bug is fixed:
$ perl -e 'for(1..10){for(__PACKAGE__){warn $_; $_++}}'
main at -e line 1.
maio at -e line 1.
maip at -e line 1.
maiq at -e line 1.
mair at -e line 1.
mais at -e line 1.
mait at -e line 1.
maiu at -e line 1.
maiv at -e line 1.
maiw at -e line 1.
for my$p(__PACKAGE__){$p++for+1..55664
,;!print"Just another \u$p hacker,\n"}
Diffstat (limited to 'lib/utf8.t')
0 files changed, 0 insertions, 0 deletions