escape commas for mplayer

2012-11-12 22:18:13 -05:00 · 2012-11-12 22:18:13 -05:00 · 751a04e5e4
commit 751a04e5e4
parent 148105b3d0
1 changed files with 4 additions and 3 deletions
--- a/convert-to-wav.pl
+++ b/convert-to-wav.pl
@ -6,6 +6,7 @@ foreach my $arg (@ARGV)
 {
    my $out = $arg;
    $out =~ s/\....$//;
+    $out =~ s/\,/\\,/g;
    system('mplayer', '-vo', 'null', '-ao', "pcm:file=$out.wav", $arg);
 }