Select Code to Download

sub printfToFile {
  my $file = shift;
...
  printf IO "$formatString", @_;
  close IO;
}

printfToFile( $logfile, '%-22s', $ifName, $ifLease );