Lines Matching refs:COMMAND
31 print STDERR "The invoking process wants preprocessed source, so let's hand off this whole command to the real cl.exe\n" if $debug;
38 die "No command file specified!" unless $commandFile;
43 open(COMMAND, '<:raw:encoding(UTF16-LE):crlf:utf8', $commandFile) or die "Couldn't open $commandFile!";
45 # The first line of the command file contains all the options to cl.exe plus the first (possibly quoted) filename
46 my $firstLine = <COMMAND>;
72 # The rest of the lines of the command file just contain source files, one per line
73 while (my $source = <COMMAND>) {
79 close(COMMAND);
191 my ($command) = @_;
193 print STDERR "Exec($command)\n" if $debug;
195 exec($command);
