Select Code to Download

use strict;
use warnings;
...
while( my( $cat, $range ) = each %ranges ) {
  print "$cat $_->[VALUE]\n" foreach @$range;
}

%ranges = (
  'ge' => [
...
    [ 30, 40, '1.55' ]
  ]
);

so 0.08
so 1.55
ge 0.52