| Subject: | Bug in spec module generator creating bugs in modules |
PPI::Tinderbox barfed on several avery modules while it was attempting to parse them.
Looking in the files, I see the following
-------------------------------------------------
package Paper::Specs::Avery::5096;
use strict;
use base qw(Paper::Specs::base::label Paper::Specs::Avery);
sub specs {
return {
code => "5096",
description => "3 1/2" Diskette Labels - Red",
^^^
--------------------------------------------
Apparently, whatever you are using to generate the modules, you arn't escaping double quotes in the description.
In fact, you probably ACTUALLY want to be generating them to use single quotes, and just escaping those.
sub generate_perl_string {
my $string = shift;
my $string = s/\'/\\\'/;
return "'$string'";
}
... or something similar