equal
deleted
inserted
replaced
149 } |
149 } |
150 push @environment_info, {name=>'helium', version=>$helium_ver}; |
150 push @environment_info, {name=>'helium', version=>$helium_ver}; |
151 |
151 |
152 # java |
152 # java |
153 my $java_ver = 'N.A.'; |
153 my $java_ver = 'N.A.'; |
154 my $java_out = `java -version`; |
154 my $java_out = `java -version 2>&1`; |
155 $java_ver = $1 if ($zip_out =~ /^java version (.*)/m); |
155 $java_ver = $1 if ($java_out =~ /^java version (.*)/m); |
156 push @environment_info, {name=>'java', version=>$java_ver}; |
156 push @environment_info, {name=>'java', version=>$java_ver}; |
157 |
157 |
158 for my $tool_info (@environment_info) |
158 for my $tool_info (@environment_info) |
159 { |
159 { |
160 print $tool_info->{name} . ": " . $tool_info->{version} . "\n"; |
160 print $tool_info->{name} . ": " . $tool_info->{version} . "\n"; |