Zdravim, $ perl -e '$,=","; print $a[0], scalar @a, map($_, ($a[0])), scalar @a, "\n"' ,0,,1, muze mi nekdo rict, proc tomu tak je? Procetl jsem dokumentaci k map, ale nejak jsem tam nenasel nic, co by mi to vysvetlovalo (ze ten map ma vedlejsi efekt $a[0] = undef). Diky P.