Názory k článku
Organizujte si svojí hudební sbírku pomocí Picarda
-
Moje kolekce ma asi 20GB tak sem chtel zkusit zdokonalit jeji oznackovani..fakt nevim ale bud s tim vubec neumim delat nebo je to nepouzitelny. kdyz to smaznu v pravo tak kam to zmizi? cekal bych ze se to zas objevi v levo.. neda se to radit podle nazvu/alba/umelce. Neni tam vyhledavani v seznamu.. nevite o necem vyspelejsim?
-
Pridas si adresar, obevi se ti to vlevo.
Das to detekovat (budto muzes automaticky clustery, nebo manualne skupiny skladeb), kdyz to neni jasne, tak se to pokusi (vetsinou trochu blbe) priradit k nejpresnejsim matchum. Ty se ti objevi vpravo.
Popretahujes skladby na spravna mista, das ulozit a hotovo.
-
pepa (neregistrovaný)
pokud je nekdo zastance cli tak se muze hodit par mych starych zkratek pouzivajici prikaz rename (soucast perlu a da se mu dat regularni vyraz nebo kod v perlu kerej pousti nad kazdym jmenem souboru)
tohle jsem pouzival jeste v dobe kdy ty prejmenovavace pro mp3 nejak moc nebyly
ps. je to psano jeste v dobe kdy rename mel prepinac -t (test) a bez nej neni to hrani a opravovani regularnich vyrazu ono (ja si ho tam radej znovu dopsal…) pac si pri kazde chybe zmrsite jmena souboru.
rename -v -t 's/xx/yy/ *
rename -v -t ‚s/_/ /g‘ *mp3
rename -v -t ‚$_=ucfirst($_);‘ * #rename – prvni velky
# Prvni Velky Vsech Slov rename -v -t ‚my @x = split(" „); foreach (@x) { $_=ucfirst($_)}; $_=join(“ ", @x)‘ *mp3
#123456×xx ⇒ 12inserted3456×xx rename -v -t ‚s/(.{2})(.*)/$1 -$2/‘ *mp3
#odcesti vsechno z il2 rename -v -t ‚use Cz::Cstocs; my $il2_to_ascii = new Cz::Cstocs „il2“, „ascii“; $_=&$il2_to_ascii($_);‘ * #odcesti – dir il2 to ascii, v. 2
#odcesti vsechno z 1250 rename -v -t ‚use Cz::Cstocs; my $il2_to_ascii = new Cz::Cstocs „1250“, „ascii“; $_=&$il2_to_ascii($_);‘ * #odcesti – dir 1250 to ascii, v. 2 #pri znaku Z~ zmrsi terminal (staci prikaz reset)
#‚02 The Sign.mp3‘ ⇒ ‚xxxx – 02 – The Sign.mp3‘ rename -v -t ‚s/^[^\d](\d)[\t \-_](.)/ xxxx – $1 – $2/‘ *mp3
# CoKoLiV 00 XxXxX ⇒ Cokoliv 00 Xxxxx rename -v -t ‚$_=lc($_); my ($x1, $x2, $x3) = ($_ =~ /^([^\-]?)[ \-_]+(\d)[ \-_]+(.*?)$/); $_=ucfirst($x1)." – $x2 – ".ucfirst($x3)‘ *mp3
#mv ‚01 Gabrielle – Out Of Reach.mp3‘ ‚Gabrielle – 01 – Out Of Reach.mp3‘ rename -v -t ‚s/^[^\d](\d)[ \-_]([^\-]?)[ _]-[ \-_](.*?)$/$2 – $1 – $3/‘ *mp3 #rename mp3
#mv ‚Gabrielle – 01 – Out Of Reach.mp3‘ ‚01 – Gabrielle – Out Of Reach.mp3‘ rename -v -t ‚s/^([^\-]) – (\d)[\t \-_](.)/$2 – $1 – $3/‘ *mp3 #rename mp3
#prejmenuje jmena mp3 souboru dle id3tagu #pozaduje mit nainstalovan mpginfo rename -v -t ‚$_ =
mpginfo "$_" | grep title | cstocs 1250 ascii; chop; s/^\stitle[^:]: (.)/$1/; s/\s$//; s/[\?*\&]/ /g; my $was2 = $was; $was2 =~ s/^[^\d](\d).*/$1/; $_ = „X-Men – ".$was2.“ – „.$_.“.mp3"‘ *.mp3 #rename mp3 from id3 tag, v. 14#a pokud je to id3v2 tag je nutno pouzit: #pozaduje program id3v2 rename -v -t ‚$_ =
id3v2 --list "$_" | grep TIT2 | cstocs 1250 ascii; chop; s/^TIT2[^:]: //;my $was2 = $was; $was2 =~ s/^[^\d](\d)./$1/; $_ = „Kabat – ".$was2.“ – „.$_.“.mp3"‘ *.mp3 #rename mp3 from id3v2 tag, v. 15# prebere jmena z textaku – jmena souboru musi obsahovat cislo, to si grepne z textaku a z te radky rozebere kusy pro nazev ciloveho souboru: rename -v -t ‚my $cislo = $_; $cislo =~ s/^[^\d](\d)./$1/; $_ =
cat < seznam.txt | grep $cislo | cstocs 1250 ascii; chop; s/^\d\d\/ ([^\d])/$1/; s/\s$//; s/[\?*\&]/ /g; my $was2 = $was; $was2 =~ s/^[^\d](\d)./$1/; $_ = $was2.„-“.$_.„.mp3“‘ *.mp3 #rename mp3 from text file v. 15 -
Picard som neskusal, ale na vsetkych takychto softoch mi chyba jedna zasadna vec – preview skladby dostupne „offline“, napr. ked mam mp3 rozne po dvd-ckach. Sam som nieco take zacal programovat, najprv v c++ + qt, potom v jave + qt s tym, ze z kazdej mp3 sa spravi kratky ogg nizkej kvality ( zabere jednotky az desiatky kB ) a ulozi sa do lokalnej db, ktora sa da searchovat a tak podobne. Vsetky moje pokusy vzdy skoncili v pre-alpha stadiu kvoli nedostatku casu. A cim dalej tym viac zacinam nadobudat dojem, ze je najvyzsi cas tuto myslienku opustit a vsetky mp3 narvat z dvd-cok na disk.
