Select Code to Download

my %scripts = (
  "010" =>  {
...
              step => '030',
            },
);

$sub = $scripts{$script}{sub} ;
$sub->($file, $step);
# Or 
&$sub($file, $step);