my $type="blee"; print("bad type\n"), print("blee\n") unless ($type eq "newer" || $type eq "older");