Select Code to Download

my %months = (
    FEB => { W1 => 11.14,
...
    MAR => { W1 => { L1 => -12.05, U1 => -14.0  },
             W2 => { L1 =>  22.0,  U1 => -13.02 }, },
);

for my $mon ( sort keys %months ) {
    for my $week ( sort keys %{ $months{$mon} } ) {
...
        else { warn "No limits for month $mon / week $week\n" }
    }
}

  1.00 <=  55.00 <=  20.00 - NOT ok
 33.00 <=  66.66 <=  13.02 - NOT ok
...
 13.06 <=  11.22 <=  13.06 - NOT ok
-12.05 <=  33.17 <= -14.00 - NOT ok
 22.00 <=  44.44 <= -13.02 - NOT ok