IWETHEY v. 0.3.0 | TODO
1,095 registered users | 0 active users | 0 LpH | Statistics
Login | Create New User
IWETHEY Banner

Welcome to IWETHEY!

New Aww, C'mon guys
I have to have this up by Monday afternoon on
current hardware with current software.

So far I've gotten the MS-Word .doc cover letter
"printed" as a post script doc. I've converted
that with ps2pdf to a pdf.

I've downloaded Text-PDF-API-0.701.4.tar.gz which
is a Perl PDF manipulation library. I should be able
to use that to overlay the "To:" data into the
current PDF cover.

All RH Linux installs since 6.0 have efax installed,
which works fine with my US Robotics fax/modem.

Should be ready by noon tomorrow.

I hope.
New Reality sucks
Under TODO:

> function to populate a Text::PDF::API object from an
> existing pdf-file ?

Hmm. Well, I still should be able to convert the current
cover to a PBM and then use Image::Magick to overlay the
text that way.
New Done
#!/usr/bin/perl -w

use strict;
use Image::Magick;


my $file = shift;
my $out = shift;
my $name = shift;
my $company = shift;
my $fax_num = shift;
my $phone_num = shift;

my $image = Image::Magick->new(magick=>'TIFF');
open(DATA, $file) or die "Can't open file - $file - $!";
$image->Read(file=>'DATA');
close(DATA);

my $line_offset_inc = 40;
my $y = 350;

$image->Annotate(text=>$name, y=>$y, fill=>'black',
\t\tpointsize=>20, x=>180);

$y+= $line_offset_inc;
$image->Annotate(text=>$company, y=>$y,fill=>'black',
\t\tpointsize=>20,x=>180);

$y+= $line_offset_inc;
$image->Annotate(text=>$fax_num, y=>$y,fill=>'black',
\t\tpointsize=>20,x=>180);

$y+= $line_offset_inc;
$image->Annotate(text=>$phone_num, y=>$y,fill=>'black',
\t\tpointsize=>20,x=>180);

$image->Write($out);
     Help on faxing? - (broomberg) - (9)
         I have a client doing this with OS/2 - (Andrew Grygus)
         check multitech - (boxley)
         Aww, C'mon guys - (broomberg) - (2)
             Reality sucks - (broomberg) - (1)
                 Done - (broomberg)
         Advice? - (ben_tilly) - (3)
             Nah - (broomberg) - (2)
                 Hmmm... - (ben_tilly) - (1)
                     Hey, admin - (broomberg)

Running on an Atari 800 with two extra 16KB memory banks.
116 ms