PC Professionell 2004 December/PCpro_2004_12.ISO/files/webserver/tsw/TSW_3.4.0.exe/Apache2/perl/cc_harness

Text File | 2003-11-06 | 295 b | 13 lines

use Config;

$libdir = $ENV{PERL_SRC} || "$Config{installarchlib}/CORE";

if (!grep(/^-[cS]$/, @ARGV)) {
    $linkargs = sprintf("%s $libdir/$Config{libperl} %s",
            @Config{qw(ldflags libs)});
}

$cccmd = "$Config{cc} $Config{ccflags} -I$libdir @ARGV $linkargs";
print "$cccmd\n";
exec $cccmd;