Select Code to Download

sub process_file {
   my ($fh, $re) = @_;
...
      # do stuff with captured data
   }
}

my $account_number = $1;
my $deposit_amount = $2;