This queue is for tickets about the Regexp-Grammars CPAN distribution.

Report information
The Basics
Id:
50913
Status:
open
Priority:
Low/Low

People
Owner:
Nobody in particular
Requestors:
CASIANO [...] cpan.org
Cc:
casiano.rodriguez.leon [...] gmail.com
AdminCc:

BugTracker
Severity:
Normal
Broken in:
1.001005
Fixed in:
(no value)



CC: casiano.rodriguez.leon@gmail.com
Subject: Warnings when redefining <token: ws>
Dear Damian, Many thanks for your modules and for your books. They are great. The program below produces a couple of warnings. May be is not a bug, but it looks like one: $ perl5.10.1 -w tokenvsruleandws.pl ab /* 1 */ c d Use of uninitialized value in scalar assignment at (re_eval 16) line 1, <> line 1. Use of uninitialized value in scalar assignment at (re_eval 14) line 1, <> line 1. $VAR1 = { '' => 'ab /* 1 */ c d', 's' => { '' => 'ab /* 1 */ c d', 'c' => 'c d', 'a' => 'ab' } }; ******************************** The program (see below) redefines token <ws>. The warnings still appear even if the token <ws> is simply redefined as: <token: ws> \s* This is the program: $ cat tokenvsruleandws.pl use strict; use warnings; use 5.010; use Data::Dumper; my $rbb = do { use Regexp::Grammars; qr{ <s> <token: ws> (?: \s+ | /\* .*? \*/)*+ <rule: s> <a> <c> <rule: c> c d <token: a> a b }xs; }; while (my $input = <>) { if ($input =~ m{$rbb}) { say Dumper \%/; } else { say "Does not match"; } } ******************************* Thanks Casiano
Subject: Re: [rt.cpan.org #50913] Warnings when redefining <token: ws>
Date: Thu, 29 Oct 2009 09:23:09 +1100
To: bug-Regexp-Grammars@rt.cpan.org
From: Damian Conway <damian@conway.org>
Thanks for the bug report, Casiano. I can confirm that it's definitely fixed in the next release. Email me directly (damian@conway.org) if you'd like a copy of the alpha of that release to work with now. Damian
Subject: Re: [rt.cpan.org #50913] Warnings when redefining <token: ws>
Date: Wed, 28 Oct 2009 23:30:06 +0100
To: bug-Regexp-Grammars@rt.cpan.org
From: Casiano Rodriguez-Leon <casiano@ull.es>
Many thanks, Damian
Show quoted text
> Email me > directly (damian@conway.org) if you'd like a copy of the alpha of that > release to work with now.
I look forward for it Best Casiano


This service runs on Request Tracker, is sponsored by The Perl Foundation, and maintained by Best Practical Solutions.

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