Select Code to Download

#!/usr/bin/env perl

...
}

$pdf->save('DX.pdf');

#!/usr/bin/env perl

...
$pdf->extractPages( 2..8 );

$pdf->cleanoutput('DXout.pdf');

Number of pages: 9