WriteMakefile( ... CC => "$^X bin/fake-cc", # shell quoting matters here! ); #### #!perl for ( map extract_paths( $_ ), @ARGV ) { # stash this somewhere, I guess. } # etc.