浏览代码

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

(untested lol)
master
moex3 2 年前
父节点
当前提交
f8bd0b2004
找不到此签名对应的密钥 GPG 密钥 ID: ABC92E00CF59BB7A
共有 1 个文件被更改,包括 6 次插入1 次删除
  1. +6
    -1
      flac2mp3.pl

+ 6
- 1
flac2mp3.pl 查看文件

@@ -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 {


正在加载...
取消
保存