Re: prejmenovani velkeho mnozstvi fotek (was: Re: Tablet pro/proti)

From: Ing. Vlastimil Pospíchal (vpospichal@tiscali.cz)
Date: 09. 04. 2003, 11:30 CEST

  • Next message: Tomas Krause: "Re: Přenos pomocí GPRS"
    On Wed, Apr 09, 2003 at 09:26:45AM +0200, Miro Vesely wrote:
    > > Nemohol by si popisat trochu presnejsie, ake su stare nazvy,
    > > a ake su nove nazvy?
    > :-) kazdy iny, nic okrem JPG | GIF | PNG nemaju spolocne, dokonca
    > niektore su jpg, ine JPG.
    
    Tak snad máš představu, jak by to pravidlo na přejmenování mělo vypadat.
    Zkus tu představu popsat, i když bude možná vypadat šíleně.
    
    > > Tie odkazy su <A href="vtip_kres/0002.jpg"> alebo
    > > <IMG src="vtip_kres/0002.jpg">???
    > jedno aj druhe
    
    Na obojí platí regulární výraz:
    
      perl -pe 's/((img src=)|(a href=))"([^"]*)"/\L\1\E"new.jpg"/gi'
    
    Stačí jen mít představu, jakým způsobem bys chtěl generovat. Zároveň
    Ti to převede názvy na malá písmenka, abys to měl jednotné. Ovšem takto
    by Ti to všechny názvy souborů převedlo na "new.jpg" a to jistě nechceš.
    Je potřeba tam zapracovat a případně upravit proměnnou \4, ale nepopsal
    jsi pravidlo, jak ty soubory chceš přejmenovávat.
    
    > > Mam na toto pekny _jednoduchy_ soft, ktory ale
    > > pri "BK ReplaceEm" vyzera ako paintbrush vedla
    > > Corela :-)) , ale toto zvladne.
    > 
    > musel by vediet:
    > pozriet na prvy nazov suboru trebars anskrto112.JPG
    > hladat ten retazec v stovkach html fajlov v dohodnutej
    > adresarove strukture. alebo v mysql databazi (txt)
    > premenovat obrazok na nieco_celkom_ine.jpg
    > vsetky najdene nazvy zmenit aj v htlm
    > pokracovat na dalsom obrazku...
    
    Tak to není moc velký problém. Pro jeden soubor anskrto112.JPG by to
    vypadalo asi takto:
    
      ren anskrto112.JPG nieco_celkom_ine.jpg
      perl -i -pe 's/\b((src)|(href))="anskrto112.JPG"/\1="nieco_celkom_ine.jpg"/gi' *.html
    
    Řádek jsem nezalomil, aby bylo patrné, že to musí být na jednom. Trochu je
    nepraktické, že se starý a nový název vyskytuje 2x, ale dá se to obejít přes
    proměnné. Nahradí i názvy AnSkRtO112.JPG a aNSKrto112.jpg.
    
    > celkom idealne by bolo keby to malo aj infteraktivny rezim,
    > ze by sa ten premenovavany obrazok zobrazil a ponuklo by to
    > defaultny_nazov_|_0991
    > a to | by bol kurzor na dopisanie presnejsieho nazvu
    
    Rozhraní by sis už musel dodělat třeba přes .vbs nebo přes .bat
    
    > mam soft, ktory vie zmenit velkost pismen v suboroch aj html,
    > ale nevie menit nazvy.
    > az tak zufalo surne to nie je.
    > Miro Vesely
    
    Perl je značně univerzální nástroj na zpracování textu. Pokud bys ho přece
    jen chtěl zkusit, zazálohuj si předem adresář, ve kterém to budeš testovat.
    ActivePerl pro Windows se může trochu lišit v některých parametrech, je
    potřeba to předem vyzkoušet.
    
    Kit
    -- 
    Ing. Vlastimil Pospíchal
    http://www.hoteldrnholec.cz
    

  • Next message: Tomas Krause: "Re: Přenos pomocí GPRS"

    This archive was generated by hypermail 2.1.6 : 09. 04. 2003, 12:00 CEST