Select Code to Download

my $e = new PostScript::Simple::EPS(file => "body.eps", colour=>1);
$e->scale(0.95);
...
$p->importeps($e, 0,40);

$p->importepsfile({overlap => 1}, "body.eps", 200,40, 200,800);