escape commas for mplayer
This commit is contained in:
parent
148105b3d0
commit
751a04e5e4
@ -4,8 +4,9 @@ use strict;
|
|||||||
|
|
||||||
foreach my $arg (@ARGV)
|
foreach my $arg (@ARGV)
|
||||||
{
|
{
|
||||||
my $out = $arg;
|
my $out = $arg;
|
||||||
$out =~ s/\....$//;
|
$out =~ s/\....$//;
|
||||||
system('mplayer', '-vo', 'null', '-ao', "pcm:file=$out.wav", $arg);
|
$out =~ s/\,/\\,/g;
|
||||||
|
system('mplayer', '-vo', 'null', '-ao', "pcm:file=$out.wav", $arg);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user