in reply to How to assign string "0" in short circuit

sub function1 {
    my $var = (defined $_[0]) ? $_[0] : "No argument";
    print $var . "\n";
}

[download]

In Section Seekers of Perl Wisdom