equal
deleted
inserted
replaced
287 } |
287 } |
288 elsif ($tool_info->{version} eq $baselineversion || $baselineversion eq 'N.A.') |
288 elsif ($tool_info->{version} eq $baselineversion || $baselineversion eq 'N.A.') |
289 { |
289 { |
290 print "[OK]"; |
290 print "[OK]"; |
291 } |
291 } |
292 elsif ($tool_info->{version} cmp $baselineversion < 0) |
292 elsif (($tool_info->{version} cmp $baselineversion) < 0) |
293 { |
293 { |
294 print "[WARNING: less recent than baseline]"; |
294 print "[WARNING: less recent than baseline]"; |
295 $cmp_diffver++; |
295 $cmp_diffver++; |
296 } |
296 } |
297 elsif ($tool_info->{version} cmp $baselineversion > 0) |
297 elsif (($tool_info->{version} cmp $baselineversion) > 0) |
298 { |
298 { |
299 print "[WARNING: more recent than baseline]"; |
299 print "[WARNING: more recent than baseline]"; |
300 $cmp_diffver++; |
300 $cmp_diffver++; |
301 } |
301 } |
302 } |
302 } |