(Courriels de diversion: <deduirais@abritant-luxurieuse.com> <lepreuse@sexuels-reorientons.com> <avoisinions@admirateur-embonpoint.com> <pretendiez@preservees-chargez.com> <eprouvaient@iterateurs-tentation.com> <cas@tracerions-rarefieraient.com> <indigna@suffoques-maximisees.com> <escaladiez@debraye-evanouissement.com> <infantiliserent@retouches-obstruaient.com> <demoule@convoiterais-grevons.com> )
Je cite Nathalie, le Thu, Aug 29, 2002 at 12:38:07PM +0200 :
> Bonjour à tous,
>
> Connaitriez-vous un soft en ligne de commande permettant de transformer des
> .mp3 en fichiers audio prêts à être gravés avec cdrecord pour
> obtenir un cd audio ? J'ai essayé de faire ça avec mpg321 qui
> permettait paraît-il d'obtenir des fichiers en .cdr mais une fois les
> fichiers encodés cdrecord n'en a pas voulu prétextant si je me souviens
> bien que la taille ou le format étaient incorrects. Donc si vous avez une
> idée de soft ?
> Merci.
Je ne sais pas où j'e l'ai trouvé, mais voilà un wrapper perl pour
mpg123 qui faisait l'affaire hier encore, alors qui doit marcher
aujourd'hui. En espérant que ça aide...
/usr/local/bin/mp32wav.pl
#!/usr/bin/perl
if (not defined @ARGV) {usage(); exit;}
elsif ($ARGV[0] eq "-h" or $ARGV[0] eq "--help") { usage(); exit;}
foreach $a (@ARGV) {
if ($a =~ "--dst=") {
$a=~s/--dst=//;
print "-> Using destination directory: $a\n";
$DST=$a;
} else {
$FILES[$#FILES+1]=$a;
}
}
if ($FILES[0] =~ /\*/) {
$FILES=`dir -X $FILES[0]`;
@FILES=split("\n",$FILES);
}
foreach $a (@FILES) {
translate($a);
}
sub translate {
my ($MP3FILE) = @_;
$WAVFILE=$MP3FILE;
$WAVFILE=~s/\.mp3//;
@WAVFILE=split(/\//,$WAVFILE);
if (!$DST) {
for $i (0 .. ($#WAVFILE-1)) {
$DST=$DST."/".$WAVFILE[$i];
}
}
$WAVFILE=$DST."/".$WAVFILE[$#WAVFILE].".wav";
print "+--+ Translating:\n",
"| |->Source.....:\033[1m$MP3FILE\033[0m\n",
"| `->Destination:\033[1m$WAVFILE\033[0m\n";
system("mpg123 -w \"$WAVFILE\" \"$MP3FILE\" 1> /dev/null 2> /dev/null");
}
sub usage {
print "\nUsage:\n",
"\tmp32wav [--dst=<destination directory>] file.mp3\n",
" or\n",
"\tmp32wav [--dst=<destination directory>] /path/*.mp3\n\n";
}
---------------------------------------------------------------------
Aide sur la liste: <URL:mailto:linux-31-help@CULTe.org>Le CULTe sur le web: <URL:http://www.CULTe.org/>