This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix parsing of readline(FH) [perl #68458]
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Sun, 23 Aug 2009 13:28:22 +0000 (15:28 +0200)
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>
Sun, 23 Aug 2009 13:28:22 +0000 (15:28 +0200)
commit9a073a1d1a270eb53990cb82ec7af8ae00d667c4
treeca2262f8207bea7484f4d273ec48ec08423b09ba
parent52a66c2cc3722485e8a16f1da9c026524180ca8c
Fix parsing of readline(FH) [perl #68458]

This was broken by commit 984f9f66477bc722578262ae8520584e44e881af,
which was committed to solve bug [perl #53806].

Basically, to make everyone happy, we need only to enforce strictures
on barewords that follow the specially parsed keywords "print" and
"exec" (and similar) -- except when they have been already parsed.
t/lib/strict/subs
toke.c