From 751a04e5e4bbfbdfb56492df1e49db35379cccc6 Mon Sep 17 00:00:00 2001
From: Josh Holtrop <jholtrop@gmail.com>
Date: Mon, 12 Nov 2012 22:18:13 -0500
Subject: [PATCH] escape commas for mplayer

---
 convert-to-wav.pl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/convert-to-wav.pl b/convert-to-wav.pl
index 3351a3b..a3c6141 100755
--- a/convert-to-wav.pl
+++ b/convert-to-wav.pl
@@ -4,8 +4,9 @@ use strict;
 
 foreach my $arg (@ARGV)
 {
-	my $out = $arg;
-	$out =~ s/\....$//;
-	system('mplayer', '-vo', 'null', '-ao', "pcm:file=$out.wav", $arg);
+    my $out = $arg;
+    $out =~ s/\....$//;
+    $out =~ s/\,/\\,/g;
+    system('mplayer', '-vo', 'null', '-ao', "pcm:file=$out.wav", $arg);
 }