Help for this page
#!/usr/bin/perl ... binmode STDOUT; $image->Write ('png:-'); exit 0;
<%perl> use Image::Magick; ... $image->Write ('png:-'); $m->abort; </%perl>