$pdf = PDF::API2->new();
...
print $pdf->stringify;

$pdf = PDF::API2->new();
...
$pdf->saveas("our/new.pdf");

$pdf = PDF::API2->new(-file => 'our/new.pdf');
...
$pdf->save;

##</code><code>##

open($fh,'our/stream.pdf') or die "$@";
@pdf = <$fh>;
$pdf = PDF::API->openScalar(join('',@pdf));
...
$pdf->saveas('our/new.pdf');