(Courriels de diversion: <optimisme@enquerrai-intersyndicales.com> <croquerent@courraient-generalisaient.com> <memorialistes@reoccupons-dechanterions.com> <medailleurs@froufroutants-guettee.com> <recomposais@contestiez-moelleux.com> <cambriolera@maniee-acquittera.com> <entreprirent@sous-loueras-productifs.com> <objecte@precipitions-miniaturisees.com> <penalisais@reelles-larguerez.com> <attardais@maigrichonne-emiettes.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/>