sub debug {
      my $debug_output = shift;
      if ($debug_output) {