Select Code to Download

my @thermos  = map { "Thermos$_" } 1..10;
my @enthalpy = 11..20;
...

use Data::Dumper;
print Dumper \%thermos;