Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Add watermark to a pdf

by steves (Curate)
on Dec 28, 2004 at 12:35 UTC ( #417754=note: print w/replies, xml ) Need Help??


in reply to Add watermark to a pdf

Can you show us the code you wrote using PDF::Reuse? It looks like the prAdd method will allow images to be added to existing pages.

You may also need to use something like ghostscript for that level of PDF manipulation. There is a GSAPI module at CPAN that provides Perl access to the ghostscript API, but I've never used it personally.

There's a PDF FAQ here. Your question of how to add watermarks is covered there but they suggest using this tool, which you have to buy.

Replies are listed 'Best First'.
Re^2: Add watermark to a pdf
by holli (Monsignor) on Dec 28, 2004 at 12:46 UTC
    i used (basically taken from the docs)

    use PDF::Reuse; use Image::Info qw(image_info dim); use strict; my $file = 'c:/kopie.jpg'; my $info = image_info($file); my ($width, $height) = dim($info); # Get the dimensions prFile('c:/myFile.pdf'); my $intName = prJpeg("$file", $width, $height); my $str = "q\n"; $str .= "$width 500 500 $height 100 100 cm\n"; $str .= "/$intName Do\n"; $str .= "Q\n"; prDoc('c:/anlage-h-rbskt.pdf'); prAdd($str); prEnd();


    but as i said, this will add the image to a new page. am i missing something?

    it will also be ok if i could just add text to the background.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://417754]
help
Chatterbox?
[Discipulus]: he does not learn, nor teach, nor learn
[planetscape]: hello all
[stonecolddevin]: o/ planetscape
[Sinistral]: I think that just the sight of his username now causes a downvote storm. I agree, and the gratuitous use of formatting does make reading hard. I've given him +1 on things where there seemed to be actual good advice, but I think the big
[Sinistral]: nail in coffin was the rant against a Schwarzian Transform
[stonecolddevin]: at best, from what i've seen, his knowledge is accurate up to maybe 2002. the sheer volume of words is mostly worthy of a downvote in most cases though i think
[erix]: ITYM Schwartzian Transform :P
[erix]: hey planetscape :)
[planetscape]: howdy stonecolddevin, erix
[Sinistral]: eric Aye. I thought I typed that wrong. All hail Randall! I listen to him on FLOSS Weekly

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (10)
As of 2017-06-22 20:54 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    How many monitors do you use while coding?















    Results (530 votes). Check out past polls.