Hirdetés

Új hozzászólás Aktív témák

  • birno

    addikt

    Sziasztok,

    Egy kis segítséget kérnék, perl script javításában.
    Annyi lenne a script lényege, hogy egy adott könyvtárban megkeresse az összes avi fájlt, majd adja át őket paraméterként a Media Player Classic-nak.
    Szegényes programozási tudásommal megalkottam az alábbi kis scriptet:

    #!c:\Perl\perl\bin\perl -w

    $a = "";

    while(<*.avi>) {
    $a = "$a . ' ' .$_";
    }
    exec('c:\Program Files (x86)\K-Lite Codec Pack\Media Player Classic\mpc-hc.exe', '/add /play', $a);

    Alapvetően működik is, csak annyi a gáz, hogy az MPC Playlist-jét ha megnézem nem csak az avi fájlokat adja át, hanem szinte az egész sort ami az exec()-ben van, ok, hogy a többit azonnal skippeli, de ez így elég csúnya.
    Fontos, hogy bármilyen fájlnevet le tudjon kezelni, mindegy milyen speciális karakter van benne, ne kelljen az átnevezgetéssel szórakozni.
    Ha valaki tudna tanácsot adni, egy kis magyarázattal egybekötve, hogy mit miért úgy kell csinálni ahogy, azt megköszönném. :)

Új hozzászólás Aktív témák