my $file = get_image_info($document);
my $filesize = -s $file;
my $buffer;

# Read the image file
open READ, "< $file" or die "Cannot open $file for reading: $!";

binmode READ;
{
  local $/;
  $buffer = <READ>;
}
close(READ);

# For Debugging Purposes
print $request->header(), " ", length($buffer), " " , -s $file ;