| Subject: | Parse::Lex |
Parse/Template.pm:1
missing ';' in "use strict"
Parse/Template.pm:135
$expr isn't declared via 'my'
test4 is also broken
i took someone else's advice and munged the data so it would find what its
lookin' for.
i included a patch with the fixes.
diff -ur ParseLex-2.15.broken/lib/Parse/Template.pm ParseLex-2.15/lib/Parse/Template.pm
--- ParseLex-2.15.broken/lib/Parse/Template.pm 1999-09-23 04:16:28.000000000 -0400
+++ ParseLex-2.15/lib/Parse/Template.pm 2005-09-27 21:57:14.378984408 -0400
@@ -1,4 +1,4 @@
-use strict
+use strict;
require 5.004;
package Parse::Template;
$Parse::Template::VERSION = '0.32';
@@ -132,7 +132,7 @@
}
# evaluated expressions are not always available in (caller(1))[6];
if (defined($1) and $1 ne '') {
- $expr = $1; # what is the template expression?
+ my $expr = $1; # what is the template expression?
{ package DB; # what is the part name?
@DB::caller = caller(2); # why is this needed? /ee?
@DB::caller = caller(1);
diff -ur ParseLex-2.15.broken/t/test4.t ParseLex-2.15/t/test4.t
--- ParseLex-2.15.broken/t/test4.t 1999-09-23 04:16:26.000000000 -0400
+++ ParseLex-2.15/t/test4.t 2005-09-27 21:59:41.440627640 -0400
@@ -54,4 +54,4 @@
[main::lexer|Parse::CLex] Token read (NEWLINE, \n):
[main::lexer|Parse::CLex] Token read (ERROR, .*): this is an invalid string with a "" in it"
-can't analyze: "this is an invalid string with a "" in it"" at examples/ctokenizer.pl line 17, <DATA> chunk 4.
+can't analyze: "this is an invalid string with a "" in it"" at examples/ctokenizer.pl line 17, <DATA> line 4.