any2jpg  

#!/usr/bin/perl my($any,$jpg)=($ARGV[0],''); $jpg="$1.jpg" if($any=~/^(.+)\.(avi|mpg|flv)$/); print qq{ffmpeg -itsoffset -1.3 -i "$any" -vcodec mjpeg -vframes 1 -an -f rawvideo -s 320x240 -y "$jpg"\n}; print qx{ffmpeg -itsoffset -1.3 -i "$any" -vcodec mjpeg -vframes 1 -an -f rawvideo -s 320x240 -y "$jpg"} if($jpg);

Vorschaubilder aus Videodateien generieren
(332B)