(defined $debug) &&
  foreach my $key (sort keys %option) {
    defined ($option{$key}) && (print (__LINE__ . ": $key = $option{$key}\n"))
  };