chdir('conf') or die "chdir: $!"; open(TST,">compilerok.c") or die "open: $!"; print TST <<'ESQ'; int main () { return 0; } ESQ close(TST); if (system("$Config{'cc'} $flags compilerok.c > compilerok.log 2>&1")) { die <<"__EOT__"; ...