sub logroll {
  my $name = shift;  # grab first argument
  my $logs = new Logfile::Rotate 
      (File => $name,
  # etc...