Page suivante Page précédente Table des matières

9. Encodage depuis un lecteur de CD-ROM

Là encore, vérifiez que vous avez suffisamment de place sur votre disque dur.

J'ai écrit un petit script Perl pour extraire et encoder des pistes d'un CD.


#!/usr/bin/perl

if ($ARGV[0] ne "") {

$count = 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 "Usage cdriper [nombre de pistes] [répertoire cible]\n\n";
}

La ligne intéressante est

$cdcap = system("cdparanoia", $count, "/mnt/mp3/tmp/cdda.wav");

Cette ligne appelle l'extracteur de CD audio, cdparanoia, qui convertit les données brutes extraites d'un CD en fichier WAV.

Les options sont $count (le nombre de pistes à extraire), puis le chemin d'accès des fichiers WAV produits. Dans mon exemple, il d'agit d'un répertoire tmp sur mon disque réservé aux MP3.

Les fichiers WAV sont ensuite convertis en MP3 avec bladeenc.

J'ai écrit ce script pour extraire tout un CD sans devoir extraire et encoder chaque piste séparément, et sans utiliser le traitement par lots de cdparanoia, qui extrait tout le disque, ce qui peut occuper jusqu'à 600 Mo.

Remarquez que ce script est très simple et ne s'embarrasse pas de détails comme la récupération d'erreurs. Vous êtes libre de l'améliorer. :-)


Page suivante Page précédente Table des matières