use PDF::API2;
    #
    $pdf = PDF::API2->new;
    $pdf = PDF::API2->open('c:\temp.pdf');
    $page = $pdf->page;
    $page = $pdf->openpage($pagenum);
    $file = 'c:\/siva.jpeg';
    $img = $pdf->image_jpeg('siva.jpeg');