# Umwandeln einer Grafik in einen String
open MYFILE, 'bild.png'  or die "Cannot open file: $!";
binmode MYFILE;
my $rawdata;
while (<MYFILE>) 
	{
	$rawdata .= $_;
	}
close MYFILE;

my $bildstring = encode_base64($rawdata);

# Diesen String als Bild verwenden:

$mw->Photo( -data => $bildstring );