make qw(...) first-class syntax

This makes a qw(...) list literal a distinct token type for the
parser, where previously it was munged into a "(",THING,")" sequence.
The change means that qw(...) can't accidentally supply parens to parts
of the grammar that want real parens.  Due to many bits of code taking
advantage of that by "foreach my $x qw(...) {}", this patch also includes
a hack to coerce qw(...) to the old-style parenthesised THING, emitting
a deprecation warning along the way.

1 files changed, 1 insertions, 1 deletions

diff --git a/t/op/studytied.t b/t/op/studytied.t
index 288bcd7551..62f1ac9ad6 100644
--- a/t/op/studytied.t
+++ b/t/op/studytied.t
@@ -23,7 +23,7 @@ plan tests => 14;
 # study() a tied variable, perl should know that the studying isn't
 # valid on subsequent references, and should account for it.
 
-for my $do_study qw( 0 1 ) {
+for my $do_study (0,1) {
     J::reset();
     my $x;
     tie $x, "J";