changeset 25 | 482757737e59 |
parent 0 | 7f656887cf89 |
child 106 | e7feb3e56cd0 |
24:0653c7ef68b2 | 25:482757737e59 |
---|---|
79 last; |
79 last; |
80 } |
80 } |
81 } |
81 } |
82 close (COMPILER); |
82 close (COMPILER); |
83 } |
83 } |
84 elsif ($platform =~ /^winscw$/i) { |
|
85 open (COMPILER, "mwccsym2.exe 2>&1 |") or die "Couldn't run \"mwccsym2.exe\": $!\n"; |
|
86 while (my $line = <COMPILER>) { |
|
87 if ($line =~ /^Version/) { |
|
88 chomp $line; |
|
89 $version = "mwccsym2 $line"; |
|
90 last; |
|
91 } |
|
92 } |
|
93 close (COMPILER); |
|
94 } |
|
84 return $version; |
95 return $version; |
85 } |
96 } |