Select Code to Download

#!/usr/bin/perl -w

...
print "IT2: ",&$code('b','b'),"\n";
print "IT3: ",&$code('a','c'),"\n";
print "IT4: ",&$code('c','c'),"\n";