Boa tarde,
Este script deve funcionar conforme seu requerimento.
Fica aqui o disclaimer usual: use por sua conta e risco, preferivelmente
fazendo um backup dos mp3 antes de utiliz�-lo ...
(cd /path/to/mp3; ls | perl rename.pl)
rename.pl
----------
#!/usr/local/bin/perl
while (<>) {
next if length $_ <= 33;
chop;
($name, $ext) = split /\./;
$n = substr($name, 0, 28) . '.' . $ext;
if (-e $n) {
print "arquivo $n ja existe\n";
next;
}
`mv $_ $n`;
}
----- Original Message -----
From: "cyrofilho" <[EMAIL PROTECTED]>
(...)
extens�o (.mp3). � possivel fazer um
script para automatizar isso?? Pois nao quero mudar manualmente o nome de
meus 5GB de musicas hehehe...
Wagner Ikeda
http://wikeda.sc.sabren.com/
Assinantes em 16/05/2002: 2247
Mensagens recebidas desde 07/01/1999: 167073
Historico e [des]cadastramento: http://linux-br.conectiva.com.br
Assuntos administrativos e problemas com a lista:
mailto:[EMAIL PROTECTED]