Harry Jackson

NAME

Text::Convert::ToImage

SYNOPSIS

 use Text::Convert::ToImage;
 my $tti =  Text::Convert::ToImage->new();
 my $length = length($email);
 if ($length > 150) {
     $email = "Your text length of $length is too large:";
 }
 my $config = {
     TEXT      => $email ? $email : "y\@hn.org",
     POINTSIZE => $point_size ? $point_size : 14,
     LEVEL     => $level ? $level : 0,
     FONT      => $font,
     XSKEW     => $xskew, 
     YSKEW     => $yskew, 
     
 };
 $tti->calculate($config);
 print "Content-type: image/png\n\n";
 binmode STDOUT; 
 $tti->Write('png:-');

DESCRIPTION

This was knocked up a long time ago and someone asked me if the source was available so I decided to put it on CPAN. There is very little documentation with it.

There are also very few tests. If more than me and the person who asked for the module use it then I will write some tests for it.

At the moment I have been using it top obfuscate emails and not much else. A demo can be found at http://www.hjackson.org/cgi-bin/tools/email.pl

There are some undocumented features to this module and they are this way because I have not tested to see if they work yet.

SEE ALSO

Image::Magick

AUTHOR

Harry Jackson

COPYRIGHT AND LICENSE

Copyright (C) 2005 by Harry Jackson

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.