sub build_url
 {
  my ($account ,$transaction, $location, $fname, $lname) = @_;
  if ($location) { ... do what you would do ... }#example
 }