use ExtUtils::MakeMaker; use Config; my $sqlite_source; @ARGV = grep { if (/^SQLITE_SOURCE\s*=\s*(.*)$/) { $sqlite_source = $1; undef; } else { 1 } } @ARGV; defined $sqlite_source or die "Usage: perl Makefile.PL SQLITE_SOURCE=/path/to/sqlite/source ...\n"; -f $sqlite_source . "/src/sqlite3ext.h" or die "SQLite source not found on the path given\n"; WriteMakefile( NAME => 'SQLite::VirtualTable', VERSION_FROM => 'lib/SQLite/VirtualTable.pm', PREREQ_PM => {}, ABSTRACT_FROM => 'lib/SQLite/VirtualTable.pm', AUTHOR => 'Salvador Fandino ', INC => "-I$sqlite_source -I$sqlite_source/src", OBJECT => 'perlvtab.o', OPTIMIZE => '-g3 -O0', dynamic_lib => { OTHERLDFLAGS => '`$(PERL) -MExtUtils::Embed -e ldopts`' } ); package MY; our @ISA = qw(ExtUtils::MakeMaker); sub constants { my $txt = shift->SUPER::constants(@_); $txt =~ s/^DLBASE\s*=.*$/DLBASE = perlvtab/m; $txt; } sub install { my $txt = shift->SUPER::install(@_); $txt =~ s/^install\b(.*)$/install$1 my_message/m; $txt } sub postamble { my $txt = shift->SUPER::installbin(@_); $txt .= <