#!/usr/bin/perl

print <<HEADERS;
Content-type: image/png
HEADERS
print "\n";

open(FILE,'/some/other/path/graphic.png');
binmode FILE;
{
    local $/;
    print <FILE>;
}
close FILE;