Select Code to Download

my %hash;
@hash{ 'A', 'B', 'C' } = ( 1, 2, 3 );

package InOut;

...

print $thingy->getparam( 2 ), "\n";