Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re: How to rotate images in PDF:API2 module?

by snoopy (Deacon)
on Nov 30, 2012 at 08:09 UTC ( #1006425=note: print w/replies, xml ) Need Help??

in reply to How to rotate images in PDF:API2 module?

I'd rotate the graphics before-hand and restore afterwards:
#!/usr/bin/perl use PDF::API2; my $img1="../first.gif"; my $pdffile="../sample.pdf"; my $pdf = PDF::API2->new( -file => "$pdffile" ); my $page1 = $pdf->page; $page1->mediabox('A4'); my $photo1 = $page1->gfx; my $photo_file1 = $pdf->image_gif($img1); $photo1->save; $photo1->transform( -rotate => 45, -translate => [my $_x = 100, my $_y = 50], ); $photo1->image( $photo_file1,50,360,510,250); $photo1->restore; $pdf->saveas($pdffile); $pdf->end();
There's likely to also be some translation involved depending on what corner you want to pivot from.

Replies are listed 'Best First'.
Re^2: How to rotate images in PDF:API2 module?
by vasanthgk91 (Sexton) on Nov 30, 2012 at 09:21 UTC

    Thank u very much...It's works fine..

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1006425]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (3)
As of 2016-10-28 03:52 GMT
Find Nodes?
    Voting Booth?
    How many different varieties (color, size, etc) of socks do you have in your sock drawer?

    Results (375 votes). Check out past polls.