How to deduce the text on the image?#!/usr/bin/perl -w use strict; use Image::Magick; my $text = 'test'; my $im = new Image::Magick; $im->Read("meteo.jpg"); $im->Annotate(text=>$text, X=>10, Y=>10); binmode STDOUT; select(STDOUT); $| = 1; undef $/; print "Content-type: image/jpeg\n\n"; print $im->Write('jpeg:-');
In reply to Image Magick by tolyan77
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |