Select Code to Download

my %temps = ( temp_2 => "foo", temp_3 => "bar" );

for my $i ( 2 .. 3 ) {
    print $temps{"temp_$i"}, "\n";
}