Browse Source

Add option for 320 CBR transcode

master
moex3 1 year ago
parent
commit
ccc5ba6af9
No known key found for this signature in database GPG Key ID: ABC92E00CF59BB7A
1 changed files with 10 additions and 2 deletions
  1. +10
    -2
      flac2mp3.pl

+ 10
- 2
flac2mp3.pl View File

@@ -142,6 +142,7 @@ sub tagmap_catalogid {
my $opt_genre;
my $opt_help;
my @opt_tagreplace;
my $opt_cbr = 0;
GetOptions(
"genre|g=s" => \$opt_genre,
"no-genre|G" => \$opt_no_genre,
@@ -150,6 +151,7 @@ GetOptions(
"catid=s" => \$opt_catid,
"comment=s" => \$opt_comment,
"tagreplace|t=s" => \@opt_tagreplace,
"320|3" => \$opt_cbr,
) or die("Error in command line option");

if ($opt_help) {
@@ -201,7 +203,12 @@ sub iterFlac {

#print("Debug: @$tagopts\n");
shellsan(\$dest);
my $cmd = "flac -cd -- '$flac' | lame -V0 -S --vbr-new -q 0 --add-id3v2 @$tagopts - '$dest'";
my $cmd;
if ($opt_cbr) {
$cmd = "flac -cd -- '$flac' | lame -S -b 320 -q 0 --add-id3v2 @$tagopts - '$dest'";
} else {
$cmd = "flac -cd -- '$flac' | lame -S -V0 --vbr-new -q 0 --add-id3v2 @$tagopts - '$dest'";
}
#print("Debug - CMD: [$cmd]\n");
qx($cmd);
if ($? != 0) {
@@ -311,7 +318,7 @@ sub shellsan {
}

sub usage {
print("Usage: flac2mp3.pl [-h | --help] [-r] [-g | --genre NUM] <input_dir> <output_dir>\n");
print("Usage: flac2mp3.pl [-h | --help] [-r] [-3] [-g | --genre NUM] <input_dir> <output_dir>\n");
exit 1;
}

@@ -328,6 +335,7 @@ Usage:
--comment STRING the comment to set (or "")
-t --tagreplace STR Replace flac tags for a specific file only
Like -t '02*flac/TITLE=Some other title'
-3, --320 Convert into CBR 320 instead into the default V0
EOF
print($h);
exit 0;


Loading…
Cancel
Save