1 (17-06-2011 14:15:38 отредактировано Perl-Admin)

Тема: Tk::Photo - Data konvertieren (Base64)

Приветствую!

Изу программку... Тоесть нужно создать такой код - строку.

my $photo_data = 'R0lGODlhAQABAJEAANnZ2f///////////yH5BAEAAAAALAAAAAABAAEAAAICRAEAOw==';
my $photo = $mw->Photo(-data => $photo_data, -format => 'gif');

Есть вообще программка, которая из источника картинки такую строку может вывести?