any2mp3
#!/usr/bin/perl foreach(@ARGV) { my $in=$_; if($in=~m{http://www\.youtube\.com/watch\?}) { print qx{youtube-dl -o "%(title)s.%(ext)s" --restrict-filenames -f18 -x --audio-format mp3 "$in" 1>&2}; } elsif($in=~/^(.*)\.(avi|mpg|mp4|wav|flv|m4a|wma|ogg|flac)$/) { print qq{ffmpeg -i "$in" -ar 44100 -ab 160k -ac 2 "$1.mp3" 1>&2}; print qx{ffmpeg -i "$in" -ar 44100 -ab 160k -ac 2 "$1.mp3" 1>&2}; } else { print "\n*** unsupported source '$in' ***\n\n"; }}
Aus Videodateien (avi, flv, etc.) mp3 extrahieren(490B)
Download