I am not sure what is going on. It works, then it does not? Is there a solution for this? I have been able to find little to NO doc on this.
use strict;
.
.
.
sub picture {
my $picture = shift;
my $xp = shift;
my $yp = shift;
my $sp = shift;
$photo->image( $pdf->image_jpeg( $picture ), $xp, $yp, $sp );
}
Thanks,
Jerry
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
