Мне нравится такой вариант:<br>my ( $a, $b, $c );<br>defined $a or $a="";<br>
defined $b or $b="";<br>
$c=$a.$b;<br>
print $c;<br>
<br>
А ещё больше мне нравится вариант<br>
$a or die;<br>
$b or die;<br>

$c=$a.$b;<br>

print $c;<br>


<br>
P.S. Не стоит использовать $a и $b нигде, кроме sort