Comment 3 for bug 1052815

Well, I don't think that this is fixed, according to http://search.cpan.org/~jesse/perl-5.14.0/pod/perl5135delta.pod#Use_of_qw%28...%29_as_parentheses the qw() function has to be wrapped in parentheses in order to be parsed correctly by perl 5.

If you do grep 'qw(' /usr/share/munin/plugins/* -n in Ubuntu 13.04 you get:

apache_processes:169: foreach my $type (qw(busy idle)) {
asterisk_channelstypes:77:my @CHANNELS = exists $ENV{'channels'} ? split ' ',$ENV{'channels'} : qw(Zap IAX2 SIP);
asterisk_codecs:82:my @CODECS = exists $ENV{'codecs'} ? split ' ',$ENV{'codecs'} : qw(gsm ulaw alaw);
asterisk_codecs:83:my @CODECSX = exists $ENV{'codecsx'} ? split ' ',$ENV{'codecsx'} : qw(0x2 0x4 0x8);
asterisk_sipchannels:80:my @CODECS = exists $ENV{'codecs'} ? split ' ',$ENV{'codecs'} : qw(gsm ulaw alaw);
asterisk_sipchannels:81:my @CODECSX = exists $ENV{'codecsx'} ? split ' ',$ENV{'codecsx'} : qw(0x2 0x4 0x8);
diskstat_:544: qw(major minor devname
diskstats:15:use Storable qw(nfreeze thaw);
diskstats:420: qw(major minor devname
...
and many more.