Mini Shell
Mini Shell
| Direktori : /home/rs/perl/mysql/lib/perl5/5.8/B/ |
| Current File : /home/rs/perl/mysql/lib/perl5/5.8/B/cc_harness |
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;