Select Code to Download

The file must return true
as the last statement to indicate successful
...
sure it'll return true otherwise.  But it's better
just to put the "1;", in case you add more
statements.

use strict;
use warnings;
...
my $def = $::DEF{'two'};

mkDec($def);

print "I'm loaded\n";
%DEF = (one => 1, two => 2);
...
  print "MkDec received ($_[0]) OK\n";
}
1;

Name "main::DEF" used only once: possible typo at try.pl line 7
I'm loaded
MkDec received (2) OK