sub handle_errors {
  # prefix error message with current time
  my $message = sprintf(@_); 
  my $time = localtime(time);
  warn "$time: $message\n";
}