ANTICHAT - Показать сообщение отдельно

Цитата:

Сообщение от Isis

-Блок задания-
Задание #1 - [Коза]

1) Получить скрин 36 секунды размером 320*240 файла koza.3gp и записать в файл koza.jpg
2) Вывести первые 15 символов картинки в base64, записать в файл xek.txt
3) Получить md5 хеш числа который находиться в файле xek.txt
Файлы, необходимые к работе:
http://x3k.ru/assignment/1/

Код:

#!perl -w
use MIME::Base64;
use Digest::MD5;
system('ffmpeg -i koza.3gp -ss 00:00:36 -s 320x240 -y -f mjpeg koza.jpg');
open  DATA , 'koza.jpg';
open  FILE , '>' , 'xek.txt';
print FILE substr(encode_base64(<DATA>),0,15 );
close DATA;
close FILE;
open  MD5_FILE , 'xek.txt';
binmode(MD5_FILE);
print Digest::MD5->new->addfile(*MD5_FILE)->hexdigest;

немного подсмотрел с ffmpeg

Код:

ffmpeg -i koza.3gp -ss 00:00:36 -s 320x240 -y -f mjpeg koza.jpg
-i filename         input file name
-ss time_off        set the start time offset
-y                  overwrite output files
-f fmt              force format
-s size             set frame size (WxH or abbreviation)