[Gike]

rontommy:
происходит ссылка на адрес переменной, которая еще не объявлена

2 раза объявлена

кстати вот так

my $urla='AAAAA';

my $urla='BBBBB';

show();
exit;

sub show {
if($urla eq ''){print 'pusto'}else{print $urla;}
}

выводит BBBBB