unless ( defined $var) { my $var = "zzz\n" }