hmmm tak v prubehu jak sme to psal me napadlo neco a uz to funguje

do
Kód:
my ($combined, $a, undef, undef, undef, undef, undef, undef, $output, $e)=split;
jsem pripsal jedno undef nakonec

Kód:
my ($combined, $a, undef, undef, undef, undef, undef, undef, $output, $e, undef)=split;
a uz to jede jak ma

dik za spolupraci pomaha mi i si o tom napsat