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/



Reply via email to