Browse Source

Create trgt dir if ! exists, and do some ' escape

(untested lol)
master
moex3 2 years ago
parent
commit
f8bd0b2004
No known key found for this signature in database GPG Key ID: ABC92E00CF59BB7A
1 changed files with 6 additions and 1 deletions
  1. +6
    -1
      flac2mp3.pl

+ 6
- 1
flac2mp3.pl View File

@@ -93,6 +93,10 @@ if (scalar(@ARGV) != 2) {

my ($IDIR, $ODIR) = @ARGV;

if (!-e $ODIR) {
mkdir $ODIR;
}

find({ wanted => \&iterFlac, no_chdir => 1 }, $IDIR);

sub iterFlac {
@@ -120,7 +124,8 @@ sub iterFlac {
argsToTags($tags);
my $tagopts = tagsToOpts($tags);

qx(flac -cd "$flac" | lame -V0 -S --vbr-new --add-id3v2 @$tagopts - "$dest");
$flac =~ s!'!'\\''!g;
qx(flac -cd '$flac' | lame -V0 -S --vbr-new --add-id3v2 @$tagopts - "$dest");
}

sub argsToTags {


Loading…
Cancel
Save