1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
#!/usr/bin/perl -i -p BEGIN { $prefix=shift; $ver=shift; } if (/INSTALLDIR_AUTOREPLACE/) { $_=qq{my \$installdir="$prefix";}; } elsif (/VERSION_AUTOREPLACE/) { $_=qq{our \$version="$ver";}; } elsif (/^use lib/) { $_=""; }