Zdenek Pytela wrote:
> Marek píše:
>
>>Zdravim mam prosbicku potrebuju prochazet adresarem a do nejake promene
>>nacitat jmena jednotlivych souboru ktere jsou v adresari.
>>Nahodte me jak na to.
>>
>
> opendir ADR, $adr;
> @soubory = readdir ADR;
>
>
Což je ovšem včetně adresářů...
opendir ADR, $adr;
@soubory = grep {-f "$adr/$_"} readdir ADR;
Bob