Path: csiph.com!eternal-september.org!feeder.eternal-september.org!mx02.eternal-september.org!.POSTED!not-for-mail
From: Carlos <angus@quovadis.com.ar>
Newsgroups: comp.lang.postscript
Subject: Re: Perl PostScript::Simple problem (font selection?)
Date: Tue, 24 Nov 2015 07:15:36 +0100
Organization: A noiseless patient Spider
Lines: 51
Message-ID: <20151124071536.1bf6b89f@samara.DOMA>
References: <32ff5f8b-76f5-4ce6-a05c-7e3613c2d2df@googlegroups.com>
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Injection-Info: mx02.eternal-september.org; posting-host="82e0b2bf4c14e7be33ce915a2d173c51"; logging-data="12216"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX1+ljzOAzGd0N7j0z8jjmG4NdTkFA/Ssric="
X-Newsreader: Claws Mail 3.13.0 (GTK+ 2.24.28; x86_64-pc-linux-gnu)
Cancel-Lock: sha1:ZmcVb36+q7vtyQWkD4ChfuNMHZw=
Xref: csiph.com comp.lang.postscript:2386

[N4TY <n4ty@me.com>, 2015-11-23 21:17]
> I have an existing working Perl script using Postscript::Simple-0.07
> on a Mac 10.9, Perl 5.12. Having problems with a new Macbook Pro, OS
> X 10.10 , Perl 5.18, Postscript::Simple-0.09.
> 
> My script is failing on simple things like "setfont" and "setcolour". 
> A simple failing program and errors is below.  
> Is this a font selection problem?  Thoughts on how to proceed?
> 
> Thanks!  
> - Tyler
> 
> 
> #!/usr/bin/perl
> 
> use strict;
> use warnings;
> use PostScript::Simple;
> 
> my $p = new PostScript::Simple(papersize => "Letter", eps => 0, units
> => "cm");
> 
> # ANY OF THESE CAUSE ERRORS (see below):
> $p->setcolour("black");
> $p->setfont("Times-Bold", 9);
> $p->setfont("Times-Roman", 9);
> 
> exit;
> 
> 
> 
> Errors posted (1st line always the same):
> internal page error at /Library/Perl/5.18/PostScript/Simple.pm line
> 2074.
> PostScript::Simple::_addtopage('PostScript::Simple=HASH(0x7fe0c202c1d0)',
> '/Times-Roman findfont 9 scalefont setfont\x{a}') called
> at /Library/Perl/5.18/PostScript/Simple.pm line 1667
> PostScript::Simple::setfont('PostScript::Simple=HASH(0x7fe0c202c1d0)',
> 'Times-Roman', 9) called at ps_test.pl line 14

I think you have to do

  $p->newpage;

before anything else.

HTH
--