Yeah, very very thank for help, now it`s making exactly what i want. but could you please explain what all this one line do?
push @{ -d "$cesta/$_" ? [EMAIL PROTECTED] : [EMAIL PROTECTED] }, $_ for grep !/\A\.\.?\z/,readdir $OBSAH;
I`m absolute begginer in perl and can`t decrypt this line:D and i`m very interested to.
thanks a lot. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
