Another way might be to use a short "here" document in the flow of the CGI statements. For example, to put a graphic at the top, something like the example below will work. Just be sure the EOF (or whatever word you use to start and end the "here" document) starts in the first space and is immediately ended with a line feed.
#!/usr/bin/perl
use CGI;
use strict;
use warnings;
my $q=CGI->new();
print $q->header;
print $q->start_html;
print <<EOF;
<img src="/images/logo.gif" alt="logo" border="0">
EOF
[other cgi statements]
print $q->end_html;
Live in the moment
|