Skip Menu |
 

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the Perl-Critic CPAN distribution.

Report information
The Basics
Id: 82415
Status: new
Priority: 0/
Queue: Perl-Critic

People
Owner: Nobody in particular
Requestors: carnil [...] debian.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



From salvatore.bonaccorso [...] gmail.com Fri Jan 4 16: 23:57 2013
MIME-Version: 1.0
X-Spam-Status: No, score=-5.596 tagged_above=-99.9 required=10 tests=[AWL=0.524, BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_HI=-5, SPF_NEUTRAL=0.779] autolearn=ham
Content-Disposition: inline
X-Spam-Flag: NO
Content-Type: multipart/signed; micalg=pgp-sha512; protocol="application/pgp-signature"; boundary="XF85m9dhOBO43t/C"
Message-ID: <20130104212343.GA920 [...] elende.valinor.li>
X-Received: by 10.14.194.195 with SMTP id m43mr146779222een.44.1357334626292; Fri, 04 Jan 2013 13:23:46 -0800 (PST)
X-Virus-Scanned: Debian amavisd-new at bestpractical.com
X-Spam-Score: -5.596
Received: from localhost (localhost [127.0.0.1]) by hipster.bestpractical.com (Postfix) with ESMTP id 8C992240BBF for <cpan-bug+Perl-Critic [...] hipster.bestpractical.com>; Fri, 4 Jan 2013 16:23:57 -0500 (EST)
Received: from hipster.bestpractical.com ([127.0.0.1]) by localhost (hipster.bestpractical.com [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id ruP0RDUQy-Gg for <cpan-bug+Perl-Critic [...] hipster.bestpractical.com>; Fri, 4 Jan 2013 16:23:55 -0500 (EST)
Received: from la.mx.develooper.com (x1.develooper.com [207.171.7.70]) by hipster.bestpractical.com (Postfix) with SMTP id E0F75240B2E for <bug-Perl-Critic [...] rt.cpan.org>; Fri, 4 Jan 2013 16:23:54 -0500 (EST)
Received: (qmail 9013 invoked by uid 103); 4 Jan 2013 21:23:54 -0000
Received: from x16.dev (10.0.100.26) by x1.dev with QMQP; 4 Jan 2013 21:23:54 -0000
Received: from mail-ea0-f175.google.com (HELO mail-ea0-f175.google.com) (209.85.215.175) by 16.mx.develooper.com (qpsmtpd/0.84/v0.84-167-g4ed6cab) with ESMTP; Fri, 04 Jan 2013 13:23:49 -0800
Received: by mail-ea0-f175.google.com with SMTP id h11so6821837eaa.34 for <bug-Perl-Critic [...] rt.cpan.org>; Fri, 04 Jan 2013 13:23:46 -0800 (PST)
Received: from elende (elende.valinor.li. [188.40.94.203]) by mx.google.com with ESMTPS id 44sm113044146eek.0.2013.01.04.13.23.44 (version=TLSv1/SSLv3 cipher=OTHER); Fri, 04 Jan 2013 13:23:45 -0800 (PST)
Authentication-Results: hipster.bestpractical.com (amavisd-new); dkim=pass header.i= [...] gmail.com
Delivered-To: cpan-bug+Perl-Critic [...] hipster.bestpractical.com
User-Agent: Mutt/1.5.21 (2010-09-15)
Subject: uninitialized values on particular sample file
Return-Path: <salvatore.bonaccorso [...] gmail.com>
X-RT-Mail-Extension: perl-critic
X-Original-To: cpan-bug+Perl-Critic [...] hipster.bestpractical.com
X-Spam-Check-BY: 16.mx.develooper.com
Dkim-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113; h=x-received:sender:date:from:to:subject:message-id:mime-version :content-type:content-disposition:user-agent; bh=LERAfGiFi9lslRpAq76/ubD5DzfG4gcjyLVN+oUzfPQ=; b=Is+yT3x6jxw8FUHLVUGRRRaic1ZhFyi1CZGota+jOLXC/M/QBdaqiLGUeMdoI/WmMr OPaP+w2pYfJE9qtzsbGnapIoeiL2sisHk5k+HcHhxr92G+dE+okMOnCPQnifq2gd6+li y/+JmG2BJQUCTPcVoTGWSF4zfEqXgnOGV9qiC5MFdXHKqxo1qBJDoh/hXDcM3sTq6msy VEjECO7EDTkFOxLQtYDuPTS79LvG20nYC29pufZFctYXZNnoFJeKZ27fOz/xXtHGOmzu OrXo8VeAU1jq3LhjlnfismVNSOvsvqnnOA0+gt+WxGXfxOJKCjc08dErldwZ1Kl/L8Pg ZILA==
Sender: Salvatore Bonaccorso <salvatore.bonaccorso [...] gmail.com>
Date: Fri, 4 Jan 2013 22:23:43 +0100
X-Spam-Level:
To: bug-Perl-Critic [...] rt.cpan.org
From: Salvatore Bonaccorso <carnil [...] debian.org>
Content-Length: 0
Content-Type: multipart/mixed; boundary="CE+1k2dSO48ffgeK"
Content-Disposition: inline
Content-Length: 0
content-type: text/plain; charset="utf-8"
Content-Disposition: inline
X-RT-Original-Encoding: us-ascii
Content-Length: 2363
Download (untitled) / with headers
text/plain 2.3k
Hi I'm forwarding the bugreport reported in Debian by Guillem Jover: http://bugs.debian.org/697329 ----cut---------cut---------cut---------cut---------cut---------cut----- Hi! While running perlcritic over the dpkg code base I've found a file perlcritic trips over. As I'm fixing issues, the file might not show those when it gets looked at so here's a reference to a specific git blob object: <http://anonscm.debian.org/gitweb/?p=dpkg/dpkg.git;a=blob;f=scripts/dpkg-genchanges.pl;h=082664140fec005917d58e7aa9866de63dfc0330;hb=HEAD> I seem to have tracked the issue down to being triggered by the '%r' verbose format. To reproduce, with an empty .perlcriticrc, run: $ perlcritic -1 --verbose "%l:%c near '%r'\n" dpkg-genchanges.pl Notice the empty '%r' expansions. Thanks, Guillem ----cut---------cut---------cut---------cut---------cut---------cut----- Attached sample.pl is a reduced example, where the uninitialized values warning are appearing too: perlcritic -3 --verbose "line %l, column %c near '%r'.\n" sample.pl Use of uninitialized value $min_width in numeric gt (>) at /usr/share/perl5/String/Format.pm line 51. Use of uninitialized value $replength in numeric gt (>) at /usr/share/perl5/String/Format.pm line 51. Use of uninitialized value $max_width in numeric gt (>) at /usr/share/perl5/String/Format.pm line 56. Use of uninitialized value $replength in numeric gt (>) at /usr/share/perl5/String/Format.pm line 56. Use of uninitialized value $replength in subtraction (-) at /usr/share/perl5/String/Format.pm line 67. Use of uninitialized value $min_width in subtraction (-) at /usr/share/perl5/String/Format.pm line 67. Use of uninitialized value $replacement in concatenation (.) or string at /usr/share/perl5/String/Format.pm line 67. line 11, column 9 near 'warn '$bar defined';'. line 14, column 25 near ''. line 16, column 5 near 'warn 'undefined value for $foo';'. where the sample.pl is ----cut---------cut---------cut---------cut---------cut---------cut----- #!/usr/bin/perl use strict; use warnings; my $foo = '1:2'; my $bar; if (defined $foo) { if (defined $bar) { warn '$bar defined'; } (my $baz = $foo) =~ s/^\d+://; } else { warn 'undefined value for $foo'; } ----cut---------cut---------cut---------cut---------cut---------cut----- (p.s.: know might be shown better) Regards, Salvatore
Content-Type: text/x-perl; charset=us-ascii
content-disposition: attachment; filename="sample.pl"
X-RT-Original-Encoding: us-ascii
Content-Length: 234
Download sample.pl
text/x-perl 234b

Message body is not shown because sender requested not to inline it.

Content-Description: Digital signature
content-type: application/pgp-signature; name="signature.asc"
Content-Length: 836
Download signature.asc
application/pgp-signature 836b

Message body not shown because it is not plain text.



This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.