sub my_system {

  my @command = @_;
  print LOGFILE join " ", @command;
  warn "This code is untested.";
  system (@command);

}