Subject: | CPAN::SQLite::META braces bug in oneliner |
Hi,
In 0.197 the CPAN::SQLite installation fails with # (environment info
see at bottom)
Gathering information from index files ...
Populating database tables ...
DBD::SQLite::db do failed: near ")": syntax error at
/usr/lib/perl5/site_perl/5.10/CPAN/SQLite/DBI/Index.pm line 115, <DATA>
line 66777.
DBD::SQLite::db do failed: near ")": syntax error at
/usr/lib/perl5/site_perl/5.10/CPAN/SQLite/DBI/Index.pm line 115, <DATA>
line 66777.
system /usr/bin/perl5.10.0.exe -MCPAN::SQLite::META=setup,update -e
setup failed: 512 at /usr/lib/perl5/site_perl/5.10/CPAN/SQLite/META.pm
line 323.
The following patches the bug ( on my system ).
$ diff -u .cpan/build/CPAN-SQLite-0.197-JamnvP/lib/CPAN/SQLite/META.pm
/usr/lib/perl5/site_perl/5.10/CPAN/SQLite/META.pm
--- .cpan/build/CPAN-SQLite-0.197-JamnvP/lib/CPAN/SQLite/META.pm
2009-02-17 07:01:38.000000000 +0100
+++ /usr/lib/perl5/site_perl/5.10/CPAN/SQLite/META.pm 2009-06-25
22:40:15.126846400 +0200
@@ -300,7 +300,7 @@
warn qq{Database locked - cannot update.};
return;
}
- my @args = ($^X, '-MCPAN::SQLite::META qw(setup update)', '-e');
+ my @args = ($^X, '-MCPAN::SQLite::META=setup,update', '-e1');
if (-e $db && -s _) {
my $mtime_db = (stat(_))[9];
my $time_string = gmtime_string($mtime_db);
P.S: my perl is
This is perl, v5.10.0 built for cygwin-thread-multi-64int
(with 6 registered patches, see perl -V for more detail)
Copyright 1987-2007, Larry Wall
$ perl -MCPAN::SQLite -e 'print CPAN::SQLite->VERSION'
0.197