Select Code to Download

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

my $var = $hash1{$name} || $hash2{$name} || $some_default_value;