Hogyan lehet Perl scriptel kiolvasni fájlok adatait (méret, létrehozva, tulajdonos, jogok), valamint a fájlok (képek, hongok, videók esetében) metadatait.
Nem szeretném a system parancsot használni, mert biztonságos módszer kellene.
Odáig OK, hogy megnyitom a könyvtárat:
opendir(FOLDER, /ahol/van);
???
closedir(FOLDER);

Szal a ??? helyére mi kell?
[align=right][snapback]115722[/snapback][/align]

Szerintem nem kell az opendir, ehelyett használt a stat parancsot:
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks) = stat($filename);

Jelentés:
* dev az eszköz száma
* ino inode száma
* mode fájlmód, típus és engedélyek
* nlink a hard linkeke száma a fájlhoz
* uid a fájl tulajdonosának numerikus azonosítója
* gid a fájlt tulajdonosának numerikus csoport azonosítója
* rdev eszközazonosító (speciális fájloknál)
* size a fájl teljes mérete bájtokban
* atime a fájl utolsó hozzáférési idõpontja
* mtime a fájl utolsó módosítási idõpontja
* ctime az indode változásának ideje
* blksize preferált blokk méret
* blocks a pillanatnyilag lefoglalt blokkok száma

A metaadatok lekérdezéséhez lövésem sincs. 🙂

Derrick isten vagy!!! 😆 😆 😆

Köszönöm, de csak egy halandó vagyok.  😉 Ráadásul nem is az én érdemem, ezt Verhás Péter doksijából ollóztam. Javaslom, ha Perl-lel akarsz behatóbban foglalkozni, keress rá a Verhás Péter névre, ott fogsz látni sok találatot. Ha meg megnézed a perlfunc.htm[l] fájlt, van benne nagyon sok okosság. 🙂 Ennél jobb anyagot még nem láttam Perl-programozás terén, mint amit ez az ember összehozott. 😀
[align=right][snapback]117170[/snapback][/align]

Kb egy percel az után, hogy válaszoltam a válaszodra, én is megtaláltam, azt a leírást.
Egyébként Linux/UNIX/Solaris/BSD alatt megy, Win alatt egy csomó hülyeséget ad eredményül, Win2000-alatt meg mutatókat eredményez. 😛