Hi,
here a perl-script I used for faxes that I received by email which contains
more then one directory:
----------------------snip---------------------------snip
: #-*-Perl-*-
eval 'exec perl -S $0 "$@"'
if 0;
#
# This script is needed for my free faxnumber account.
#
# I get some tiff-files with some Directorys for each page.
#
$| = 1;
use File::Basename;
use Getopt::Long;
Getopt::Long::Configure('bundling');
GetOptions ('h|height|HEIGHT:f' => \$height,
'w|width|WIDTH:f' =>\$width,
'v|verbose|VERBOSE' =>\$VERBOSE
);
#
# Heigth and width must be in inch!
#
# Default is DIN A4 Portrait.
#
$width = 8.27 unless $width;
$height = 11.42 unless $height;
$TIFFINFO ="tiffinfo";
$TIFF2PS = "tiff2ps";
$TIFF = $ARGV[0] || usage();
open (F,"$TIFFINFO $TIFF | grep Directory |") || die "Can't create pipe:$!";
@ALL = <F>;
close (F);
print "Number of TIFF-Directorys found:".($#ALL + 1)."\n" if ($VERBOSE);
foreach $t (0 .. $#ALL) {
print "Processing TIFF-Directory :$t ..." if ($VERBOSE);
system "$TIFF2PS -d $t -w $width -h $height $TIFF | lpr ";
print "Done.\n" if ($VERBOSE);
}
sub usage {
print basename($0)." [options] tiff-file\n\n";
print "Print a tiff with 1 or more directorys with one call!\n";
print "-h --height : Set the height of the output default ($height in)\n";
print "-w --width : Set the width of the output default ($width in) \n";
exit -1;
}
-----snip------------------------------------snip
I produce PS from my tiff files with tiff2ps . then it is easy to convert the
PS into PDF.
Cheers
Reinhhard
Am Donnerstag, 12. Juni 2003 00:17 schrieb Mike McMullen:
> Hi Jeff,
>
> Yes I looked at tifftopnm and that whole scenario. Unfortunately we use
> multi-page tiffs as a document storage format. tifftopnm from my reading
> looks like it only handles single page tiff images. I'd like to avoid
> having to
> split the tiffs up before converting.
>
> Thanks,
>
> Mike
> ----- Original Message -----
>
> > On Wed, Jun 11, 2003 at 04:58:20PM -0700, Mike McMullen wrote:
> > > Is there an open source TIFF to PDF converter available for Linux?
> > >
> > > I tried looking through Google but got a lot of stuff that was ancient
>
> or
>
> > > not what I was looking for or too expensive.
> > >
> > > I've tried using tiff2ps piped through ps2pdf but the top of my images
> > > keep getting cut off no matter what setting I use.
> >
> > Have you tried :
> > tifftopnm <tiffile.tiff | pnmtops $SOME_OPTIONS | ps2pfd > foo.pdf
> >
> > $SOME_OPTIONS contain pagesize and scaling information. dive into the
> > man pages!
> >
> >
> > --
> > Jeff Kinz, Open-PC, Emergent Research, Hudson, MA. [EMAIL PROTECTED]
> > copyright 2003. Use is restricted. Any use is an
> > acceptance of the offer at http://www.kinz.org/policy.html.
> > Don't forget to change your password often.
> >
> >
> > --
> > redhat-list mailing list
> > unsubscribe mailto:[EMAIL PROTECTED]
> > https://www.redhat.com/mailman/listinfo/redhat-list
--
redhat-list mailing list
unsubscribe mailto:[EMAIL PROTECTED]
https://www.redhat.com/mailman/listinfo/redhat-list
