[Bug 1052815] Re: Perl warnings break plugins

[Adam]

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.

-- 
You received this bug notification because you are a member of Ubuntu
Server Team, which is subscribed to munin in Ubuntu.
https://bugs.launchpad.net/bugs/1052815

Title:
  Perl warnings break plugins

To manage notifications about this bug go to:
https://bugs.launchpad.net/ubuntu/+source/munin/+bug/1052815/+subscriptions