severity 507228 minor thanks On Fri, Nov 28, 2008 at 11:32:45PM -0500, Anthony DeRobertis wrote: > Package: perl-modules > Version: 5.10.0-17 > Severity: normal > File: /usr/share/perl/5.10.0/Term/Cap.pm
> Take the example program from <http://www.perlmonks.org/?node_id=18774>. > If you run it normally, it works (well, you have to change it to *STDOUT > on the last line); if you run it with perl -T: > > Can't find a valid termcap file at - line 14 It's running infocmp from $PATH. From line 288 or so: if ( grep { -x "$_/infocmp" } split /:/, $ENV{PATH} ) { eval { my $tmp = `infocmp -C 2>/dev/null`; $tmp =~ s/^#.*\n//gm; # remove comments if ( ( $tmp !~ m%^/%s ) && ( $tmp =~ /(^|\|)${termpat}[:|]/s ) ) { $entry = $tmp; } }; } I'd say the diagnostics for the failing eval should just be improved. If you need the script to work under taint mode, untaint $ENV{PATH} first. -- Niko Tyni [EMAIL PROTECTED] -- To UNSUBSCRIBE, email to [EMAIL PROTECTED] with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
