Мне нравится такой вариант:
my ( $a, $b, $c );
defined $a or $a="";
defined $b or $b="";
$c=$a.$b;
print $c;

А ещё больше мне нравится вариант
$a or die;
$b or die;
$c=$a.$b;
print $c;

P.S. Не стоит использовать $a и $b нигде, кроме sort
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить