sub is_smoker {
  return $ENV{AUTOMATED_TESTING} ? 1 : 0;
}
