build_url( $account,[$fname], [$lname]);

sub build_url {
   my $lname = pop;
   my $fname = pop;
print "$lname and $fname\n";
   my ($account ,$transaction, $location) = @_;
   ...
}