Select Code to Download

my $numb = '';
print 5 + ($numb||0); # no warning

print "==> Foo: " . ($s || '') . "<===\n";