Re: [Groff] groff and papir size

[Ralph Corderoy]

Hi Stewart,

> Here's an awk one-liner to convert A4 groff output to reversed output,
> suitable for your filmsetter:
> 
> awk '/^%%EndPageSetup/ {print "-1 1 scale\n595 neg 0 translate";}
> {print;}' file.ps > file_reversed.ps
> 
> or in Perl:
> 
> perl -nwe 'print "-1 1 scale\n595 neg 0 translate\n" if
> (/^%%EndPageSetup/); print $_;' file.ps > file_reversed.ps

Thanks Stewart, very handy, I'll keep those.  They can be made a little
shorter using some more defaults.

    awk '/^%%EndPageSetup/ {print "-1 1 scale\n595 neg 0 translate"} 1' \
        file.ps >rev.ps

    perl -pe 's/^%%EndPageSetup/-1 1 scale\n595 neg 0 translate\n$&/' \
        file.ps >rev.ps

Cheers,


Ralph.