Select Code to Download

#!/usr/bin/perl
use strict;
...
my $grfx = $page->gfx();
$grfx->image($img_obj, 5,5, 500,500);
$pdf->saveas('new.pdf');