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

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.


Comment on Re: How to rotate images in PDF:API2 module?
Download Code
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?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (12)
As of 2014-09-19 10:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (134 votes), past polls