common/tools/envinfo.pl
changeset 901 1bec8957803b
parent 888 5cd45cbf7622
child 905 9ed73a51c728
equal deleted inserted replaced
900:ed28a33746f2 901:1bec8957803b
    77 push @environment_info, {name=>'sbs', version=>$sbs_ver};
    77 push @environment_info, {name=>'sbs', version=>$sbs_ver};
    78 
    78 
    79 # Metrowerk Compiler
    79 # Metrowerk Compiler
    80 my $mwcc_ver = 'N.A.';
    80 my $mwcc_ver = 'N.A.';
    81 my $mwcc_out = `mwccsym2 -version`;
    81 my $mwcc_out = `mwccsym2 -version`;
    82 $mwcc_ver = $1 if ($mwcc_out =~ /^Version (.*) \(Build/m);
    82 $mwcc_ver = $1 if ($mwcc_out =~ /^Version (.*)/m);
    83 push @environment_info, {name=>'mwccsym2', version=>$mwcc_ver};
    83 push @environment_info, {name=>'mwccsym2', version=>$mwcc_ver};
    84 
    84 
    85 # RVCT 2.2
    85 # RVCT 2.2
    86 my $rvct22_ver = 'N.A.';
    86 my $rvct22_ver = 'N.A.';
    87 my $rvct22_path = '';
    87 my $rvct22_path = '';