common/tools/envinfo.pl
changeset 888 5cd45cbf7622
parent 884 18fc0e69c5b8
child 905 9ed73a51c728
equal deleted inserted replaced
886:fc600bbaa15c 888:5cd45cbf7622
    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 = '';