view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

    $root = "$prefix/$SERVER_ROOT_DIR";
}

$PORT ||= 8077;
$INSTALL_DIR ||= $root;

#############################################################
print "Fixing $MODULE_VARS\n";
{
    local $^I = '.bk';
    local @ARGV = ( $MODULE_VARS );
    while( <> ) {
        s/(args->\{port\}.+?)\d+(;\s+# PORT)/$1$PORT$2/;
        s/(args->\{root\}.+')[^']+(';\s+# ROOT)/$1$INSTALL_DIR\/xul$2/;
        print;
    }
}

#############################################################
print <<MESSAGE;