nacitanie adresara

[Jan ' Kozo ' Vajda]

:> > > sort {expr} readdir(DIR);
:> > > 
:> > > lenze si neviem predstavit, co dat dovnutra 
:> > Treba	-s $a <=> -s $b
:> 
:> Nebo pokud chcete napr. jen soubory, ktere nezacinaji
:> teckou, jdou cist a jsou serazeny podle locales:
:> 
:> @mail_folders=sort (grep { ! /^\./ && -r "$MAILDIR/$_" }
:>                     readdir (DIR));
:> 
:> Toto je podobny priklad jaky je v man, funkce
:> readdir. To najdete po namackani techto znaku v shellu:
:> 
:>   man perlfunc<Enter>/  readdir <Enter><parkrat sipka dolu>
:> 
:> :-)
:> (Mezery okolo readdir jsou nutne ;-)

manual som si pozeral a az take pako nie som . ale neslo mi o alfabeticke
triedenie .. ale o triedenie podla inych veci ( size, atime, mtime )

takze predpokladam, ze som tu ironiu v odpovedi nepotreboval ..



		                                   K O Z O 
                		    ===================================
                                      Look At Your Young Man Fighting
                                         Look At Your Woman Crying
                                       Look At Your Young Man Dying
                                    The Way They've Always Done Before