Select Code to Download

  my $info1 = grok_file $file1;
  my $info2 = grok_file $file2;
...
      } # NET

  } # MODULE

sub diff_gates ( $ $ $ )
{
...
        }
    }
}

sub grok_file ( $ )
{
...

    return \%info;
}