Skip Menu |
 

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the PPI CPAN distribution.

Report information
The Basics
Id: 50309
Status: resolved
Priority: 0/
Queue: PPI

People
Owner: Nobody in particular
Requestors: user42 [...] zip.com.au
Cc:
AdminCc:

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



Received: from la.mx.develooper.com (x1.develooper.com [207.171.7.70]) by diesel.bestpractical.com (Postfix) with SMTP id 58EF719B8263 for <bug-PPI [...] rt.cpan.org>; Wed, 7 Oct 2009 18:32:27 -0400 (EDT)
Received: (qmail 20314 invoked by uid 103); 7 Oct 2009 22:32:27 -0000
Received: from x16.dev (10.0.100.26) by x1.dev with QMQP; 7 Oct 2009 22:32:27 -0000
Received: from mailout1-1.pacific.net.au (HELO mailout1.pacific.net.au) (61.8.2.208) by 16.mx.develooper.com (qpsmtpd/0.80) with ESMTP; Wed, 07 Oct 2009 15:32:20 -0700
Received: from mailproxy1.pacific.net.au (mailproxy1.pacific.net.au [61.8.2.162]) by mailout1.pacific.net.au (Postfix) with ESMTP id 8FC99508513 for <bug-PPI [...] rt.cpan.org>; Thu, 8 Oct 2009 09:32:13 +1100 (EST)
Received: from blah.blah (ppp2C21.dyn.pacific.net.au [61.8.44.33]) by mailproxy1.pacific.net.au (Postfix) with ESMTP id B42B08C0B for <bug-PPI [...] rt.cpan.org>; Thu, 8 Oct 2009 09:32:06 +1100 (EST)
Received: from gg by blah.blah with local (Exim 4.69) (envelope-from <gg [...] zip.com.au>) id 1Mvf2N-00026X-QT for bug-PPI [...] rt.cpan.org; Thu, 08 Oct 2009 09:31:11 +1100
Delivered-To: cpan-bug+PPI [...] diesel.bestpractical.com
MIME-Version: 1.0
User-Agent: Gnus/5.110011 (No Gnus v0.11) Emacs/23.1 (gnu/linux)
Subject: literal() wrong result on "qw (a b c)"
X-Spam-Status: No, hits=0.0 required=8.0 tests=
Return-Path: <gg [...] zip.com.au>
X-Spam-Check-BY: 16.mx.develooper.com
X-Original-To: bug-PPI [...] rt.cpan.org
Date: Thu, 08 Oct 2009 09:31:10 +1100
X-Spam-Level: *
X-Virus-Checked: Checked by ClamAV on 16.mx.develooper.com
Content-Type: multipart/mixed; boundary="=-=-="
Message-ID: <87fx9un8ep.fsf [...] blah.blah>
To: bug-PPI [...] rt.cpan.org
From: Kevin Ryde <user42 [...] zip.com.au>
Content-Length: 0
X-RT-Original-Encoding: ascii
content-type: text/plain; charset="utf-8"
Content-Length: 267
Download (untitled) / with headers
text/plain 267b
With PPI 1.206 and recent debian i386 perl 5.10.1, the program below prints (a,b,c where I hoped it would be a,b,c I think whitespace after qw like "qw (a b c)" is allowed, the same as with other "q"s, or at least it runs fine, and comes about as a,b,c.
Content-Type: text/x-perl
content-disposition: inline; filename="foo.pl"
Content-Length: 245
Download foo.pl
text/x-perl 245b
use strict; use warnings; use PPI; my $document = PPI::Document->new (\'qw (a b c)') or die $@->message; my $words = $document->schild(0)->schild(0); print ref $words,"\n"; my @words = $words->literal; print join(',', @words),"\n"; exit 0;
MIME-Version: 1.0
In-Reply-To: <87fx9un8ep.fsf [...] blah.blah>
X-Mailer: MIME-tools 5.427 (Entity 5.427)
Content-Disposition: inline
Charset: utf8
References: <87fx9un8ep.fsf [...] blah.blah>
Content-Type: text/plain
Message-ID: <rt-3.6.HEAD-2295-1254978067-1858.50309-0-0 [...] rt.cpan.org>
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
Content-Length: 186
Download (untitled) / with headers
text/plain 186b
Changed the contributed ->literal to use the section information automatically populated by the quote engine, rather than assuming the substring range to use. Fixed in the next release.


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.