sub but() {
  my ($x,$y) = @_;
  die "that's unpossible!" if (!$x && $y)
  return $x;
}