De nuevo, asegúrese que hay espacio suficiente en el disco duro.
Escribí un script muy simple en Perl, que extraerá las pistas de un CD y luego las comprimirá:
#!/usr/bin/perl
if ($ARGV[0] ne "") {
$acount = 1;
do {
$cdcap = system("cdparanoia", $count, "/mnt/mp3/tmp/cdda.wav");
$track = "$ARGV[1]/track".$count.".mp3";
$benc = system("bladeenc/tmp/cdda.wav $track -br 256000");
$count++;
} until $count > $ARGV[0];
exit;
} else {
print "Uso: cdriper [no. de pistas] [directorio destino]\n\n";
}
Las líneas de mayor interés son:
$cdcap = system("cdparanoia", $count, "/mnt/mp3/tmp/cdda.wav");
Esta línea llama al extractor de audio (ripper), cdparanoia
.
Aquel convierte la información de audio en crudo del CD, a un archivo en
formato WAV.
Estoy usando cdparanoia
, pero si quiere usar CDDA2WAV, la linea de comando
sería:
$cdcap = system("cdda2wav", $count, "/mnt/mp3/tmp/cdda.wav");
Los parámetros que siguen, son $count
: el número de pista que se va a
extraer, y la trayectoria de salida para el archivo que se obtenga. En mi
ejemplo, será el directorio tmp en mi disco SCSI MP3.
El archivo WAV que se obtiene, es convertido a Mp3 luego, usando BladeEnc.
Escribí este script para Perl, para poder extraer un CD sin tener que extraer y comprimir cada pista, y sin usar el modo batch de CDParanoia. Ese modo toma más espacio en disco, ya que CDParanoia extrae el CD completo, lo que puede llegar a significar mas de 600Mb.
Nota: Tenga en cuenta que el script de más arriba es muy básico, y carece de ciertas habilidades, como control de errores, etc. Mejórelo a su gusto.