urizackhem has asked for the wisdom of the Perl Monks concerning the following question:
Thank you very much, Umy $q = CGI->new(); say $q->header() , $q->start_html("Z weather"); say "<center>"; say "<p><strong>Weather measurements</p></strong>"; my $image; my $imageHandle; local $/ = undef; open ($imageHandle , "< $imagefile"); binmode $imageHandle; $image = <$imageHandle>; close ($imageHandle); my $r = CGI->new(); print $r->header(-type=>'image/png') , $image; say "</center>"; say $q->end_html();
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: CGI and image
by Corion (Patriarch) on Dec 13, 2016 at 17:31 UTC | |
by kschwab (Vicar) on Dec 13, 2016 at 17:39 UTC | |
by afoken (Chancellor) on Dec 16, 2016 at 20:17 UTC | |
by kschwab (Vicar) on Dec 17, 2016 at 15:04 UTC | |
|
Re: CGI and image
by NetWallah (Canon) on Dec 13, 2016 at 21:03 UTC | |
|
Re: CGI and image
by bart (Canon) on Dec 18, 2016 at 11:19 UTC |