view release on metacpan or  search on metacpan

tool/build_cs.pl  view on Meta::CPAN

#!perl -w

use strict;
use Fatal qw(chdir);
use Config;

my $cs_dir = shift(@ARGV) || die "Usage: $0 CS_BUILD_DIRECTRY\n";

my @configure_args = qw(
    --disable-compression
    --disable-apache
    --disable-python
    --disable-perl
    --disable-ruby
    --disable-java
    --disable-csharp
    --disable-gettext
);

chdir $cs_dir;

# for configure
$ENV{CC}      = $Config{cc};
$ENV{CFLAGS}  = $Config{ccflags} . ' ' . $Config{optimize};
$ENV{LDFLAGS} = $Config{ldflags};
#$ENV{LIBS}    = $Config{libs};

eval {
    xsystem('./configure', @configure_args);
} or do {
    warn $@;
    if(open my $in, '<', "config.log"){
        while(<$in>){
            warn "!!! $_" if /\b cannot \b/xms;
        }
        close $in;
    }
    die "$0 stopped";
};
xsystem('make');

sub xsystem {
    print "@_\n";
    system(@_) == 0
        or die "Fail!\n";
}