Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re: setting PDF background color

by Khen1950fx (Canon)
on Mar 30, 2013 at 11:56 UTC ( [id://1026269]=note: print w/replies, xml ) Need Help??


in reply to setting PDF background color

Run ths first:
#!/usr/bin/perl use strict; use warnings; use PDF::API2; my $file = 'SavedAttachment.pdf'; my $pdf = PDF::API2->new( -file => $file ); $pdf->mediabox( 595, 842 ); my $page = $pdf->page; my $fnt = $pdf->corefont( 'Arial', -encode => 'latin1' ); my $txt = $page->text; $txt->textstart; $txt->font( $fnt, 8 ); $txt->translate( 25, 630 ); $txt->fillcolor('black'); $txt->text("FullCustName"); $pdf->saveas; exit;
Then try setpdfbackground.pl from the command line:
setpdfbackground.pl -o SavedAttachment.pdf 1 fcd SavedAttachment.pdf
I used fcd because I wanted something neutral and down-to-earth.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (3)
As of 2024-04-19 19:52 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found