[30212] in Perl-Users-Digest
Perl-Users Digest, Issue: 1455 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Apr 22 16:12:26 2008
Date: Tue, 22 Apr 2008 13:12:18 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 22 Apr 2008 Volume: 11 Number: 1455
Today's topics:
Re: Creating PDF documents from a Perl Program... <nigel@bouteyres.com>
Re: Creating PDF documents from a Perl Program... <gerry@nowhere.ford>
Re: Creating PDF documents from a Perl Program... <hjp-usenet2@hjp.at>
Re: Does Perl use a special hand-made parser, or does i <joost@zeekat.nl>
Does Perl use a special hand-made parser, or does it us <irishhacker@gmail.com>
Re: Does Perl use a special hand-made parser, or does i <devnull4711@web.de>
Re: Does Perl use a special hand-made parser, or does i <hansmu@xs4all.nl>
Re: Does Perl use a special hand-made parser, or does i <benkasminbullock@gmail.com>
EPIC : a very good Perl IDE <howachen@gmail.com>
Re: EPIC : a very good Perl IDE <smallpond@juno.com>
Re: EPIC : a very good Perl IDE <howachen@gmail.com>
Extract javascript strings using regex <kingskippus@gmail.com>
Re: Extract javascript strings using regex <uri@stemsystems.com>
Re: Extract javascript strings using regex <benkasminbullock@gmail.com>
Re: Extract javascript strings using regex <jurgenex@hotmail.com>
Re: Extract javascript strings using regex <bugbear@trim_papermule.co.uk_trim>
Re: Extract javascript strings using regex <abigail@abigail.be>
Re: FAQ 1.12 What's the difference between "perl" and " <uri@stemsystems.com>
Re: FAQ 1.4 What are Perl 4, Perl 5, or Perl 6? <szrRE@szromanMO.comVE>
Re: FAQ 1.4 What are Perl 4, Perl 5, or Perl 6? <rvtol+news@isolution.nl>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 16 Apr 2008 07:56:57 -0700 (PDT)
From: Danish <nigel@bouteyres.com>
Subject: Re: Creating PDF documents from a Perl Program...
Message-Id: <c645df27-e3ee-4a2b-a0d0-395f457ef6e2@y21g2000hsf.googlegroups.com>
On Apr 16, 6:05=A0am, "Gerry Ford" <ge...@nowhere.ford> wrote:
> "Danish" <ni...@bouteyres.com> wrote in message
>
> news:11fc2e51-1881-431b-97dc-8bf25c5c522f@m71g2000hse.googlegroups.com...
>
> > Hi there,
>
> > I'm working on a database driven website and I need to output data in
> > PDF format. The database handling is all written in Perl so I'd prefer
> > to stick to Perl if possible, hence my question in this newsgroup!
>
> > I've done some research and come up with a couple of ideas: PDF on the
> > Fly from Nottingham University and a module listed on CPAN called PDF-
> > Create-0.08 by Markus Baertschi.
>
> > What I'd like to know is if anyone out there has experience of doing
> > this kind of thing. What method they used and what problems they hit,
> > if any.
>
> Nigel,
>
> I thought I might try the same task. =A0My ppm shows 2 different .08 versi=
ons
> available, one by Markus and another by Fabian.
>
> I can't tell 100% which one I did, but right off the bat I tried to fire u=
p
> their sample.pdf in \lib\PDF\ and acrobat can't read it. =A0I think this b=
odes
> poorly for the process that created it.
>
> I wish I could tell you which one I had. =A0With ppm, I feel like a toddle=
r
> with a fire hose.:-0
> --
> "Shopping for toilets isn't the most fascinating way to spend a Saturday
> afternoon. But it beats watching cable news."
>
> ~~ =A0Booman
Hi Booman,
I installed the PDF::Create module and tried the sample.pl program -
same result as you: couldn't open the sample.pdf created. I
investigated further and found that the sample program tries to
include a .gif and a .jpg which weren't automatically downloaded with
the install. I retrieved them from CPAN, placed them in the same
directory as the sample program and it worked. All this on my PC
running under XP, I've yet to try installing and running it on my UNIX
server, but if it goes this easily I'll be very happy.
Oh, and it seems the module was worked on by both Fabien AND Markus.
Cheers,
Nigel
------------------------------
Date: Thu, 17 Apr 2008 22:12:12 -0500
From: "Gerry Ford" <gerry@nowhere.ford>
Subject: Re: Creating PDF documents from a Perl Program...
Message-Id: <1208487890_40@news.newsgroups.com>
"Danish" <nigel@bouteyres.com> wrote in message
news:c645df27-e3ee-4a2b-a0d0-395f457ef6e2@y21g2000hsf.googlegroups.com...
On Apr 16, 6:05 am, "Gerry Ford" <ge...@nowhere.ford> wrote:
> I can't tell 100% which one I did, but right off the bat I tried to fire
> up
> their sample.pdf in \lib\PDF\ and acrobat can't read it. I think this
> bodes
> poorly for the process that created it.
>
> I wish I could tell you which one I had. With ppm, I feel like a toddler
> with a fire hose.:-0
> --
> "Shopping for toilets isn't the most fascinating way to spend a Saturday
> afternoon. But it beats watching cable news."
>
> ~~ Booman
Hi Booman,
I installed the PDF::Create module and tried the sample.pl program -
same result as you: couldn't open the sample.pdf created. I
investigated further and found that the sample program tries to
include a .gif and a .jpg which weren't automatically downloaded with
the install. I retrieved them from CPAN, placed them in the same
directory as the sample program and it worked. All this on my PC
running under XP, I've yet to try installing and running it on my UNIX
server, but if it goes this easily I'll be very happy.
Oh, and it seems the module was worked on by both Fabien AND Markus.
Cheers,
Nigel
--->My point was slightly different. I would think that the sample.pdf
would be an example of something that could stand by itself and be read by
acrobat. Why else the filetype?
Do I take it that you got the script to work and that you have something
that acrobat reads?
Maybe the sample.pdf needs the script to run correctly before it can be
read.
--
"A belief in a supernatural source of evil is not necessary; men alone
are quite capable of every wickedness."
~~ Joseph Conrad (1857-1924), novelist
------------------------------
Date: Mon, 21 Apr 2008 18:42:42 +0200
From: "Peter J. Holzer" <hjp-usenet2@hjp.at>
Subject: Re: Creating PDF documents from a Perl Program...
Message-Id: <slrng0ph04.idj.hjp-usenet2@hrunkner.hjp.at>
On 2008-04-15 11:11, Danish <nigel@bouteyres.com> wrote:
> I'm working on a database driven website and I need to output data in
> PDF format. The database handling is all written in Perl so I'd prefer
> to stick to Perl if possible, hence my question in this newsgroup!
>
> I've done some research and come up with a couple of ideas: PDF on the
> Fly from Nottingham University and a module listed on CPAN called PDF-
> Create-0.08 by Markus Baertschi.
I've used PDF::Create in the past (the PDF files below
http://www.wifo.ac.at/wwa/jsp/index.jsp?&fid=26950 are created with it).
It's relatively simple to use but quite limited (I had to add a method
to draw rectangles to get the striped look).
For new projects I'd use PDF::API2. It is very powerful, but a bit more
complicated to use (and last time I looked the docs weren't very good),
but there is a mailinglist where you can get help. The author is using
it to create colourful reports for the management from various databases
(mostly networking statistics, afaik), so it's probably not far off what
you need. (Generally it's rather low level - there was talk about adding
some higher-level functions, but I don't know if it was done).
hp
------------------------------
Date: Wed, 16 Apr 2008 22:00:23 +0200
From: Joost Diepenmaat <joost@zeekat.nl>
Subject: Re: Does Perl use a special hand-made parser, or does it use Yacc or some other pre-packaged tool?
Message-Id: <87iqyhzi20.fsf@zeekat.nl>
Robert <irishhacker@gmail.com> writes:
> Do you know?
perlfaq7 may be of interest.
--
Joost Diepenmaat | blog: http://joost.zeekat.nl/ | work: http://zeekat.nl/
------------------------------
Date: Wed, 16 Apr 2008 12:49:02 -0700 (PDT)
From: Robert <irishhacker@gmail.com>
Subject: Does Perl use a special hand-made parser, or does it use Yacc or some other pre-packaged tool?
Message-Id: <2bc34b35-bc91-47d3-93bb-4268c0a3c231@m36g2000hse.googlegroups.com>
Do you know?
------------------------------
Date: Wed, 16 Apr 2008 22:02:36 +0200
From: Frank Seitz <devnull4711@web.de>
Subject: Re: Does Perl use a special hand-made parser, or does it use Yacc or some other pre-packaged tool?
Message-Id: <66n4bdF2kr9pfU2@mid.individual.net>
Robert wrote:
> Do you know?
$ perldoc -q yacc
| Can I get a BNF/yacc/RE for the Perl language?
|
| There is no BNF, but you can paw your way through the yacc grammar in
| perly.y in the source distribution if you're particularly brave. The
| grammar relies on very smart tokenizing code, so be prepared to venture
| into toke.c as well.
|
| In the words of Chaim Frenkel: "Perl's grammar can not be reduced to
| BNF. The work of parsing perl is distributed between yacc, the lexer,
| smoke and mirrors."
Frank
--
Dipl.-Inform. Frank Seitz; http://www.fseitz.de/
Anwendungen für Ihr Internet und Intranet
Tel: 04103/180301; Fax: -02; Industriestr. 31, 22880 Wedel
------------------------------
Date: Thu, 17 Apr 2008 00:50:15 +0200
From: Hans Mulder <hansmu@xs4all.nl>
Subject: Re: Does Perl use a special hand-made parser, or does it use Yacc or some other pre-packaged tool?
Message-Id: <48068265$0$14350$e4fe514c@news.xs4all.nl>
Robert wrote:
> Do you know?
The parser is a fairly standard LALR parser generated using
bison from the perly.y file in the source distribution.
The lexical analyser, OTOH, is a special hand-made lexer.
All the smoke and mirrors used to parse Perl can be found
in the lexer source code in the file toke.c.
-- HansM
------------------------------
Date: Thu, 17 Apr 2008 00:12:26 +0000 (UTC)
From: Ben Bullock <benkasminbullock@gmail.com>
Subject: Re: Does Perl use a special hand-made parser, or does it use Yacc or some other pre-packaged tool?
Message-Id: <fu64la$gbl$2@ml.accsnet.ne.jp>
On Wed, 16 Apr 2008 12:49:02 -0700, Robert wrote:
> Do you know?
If you compile perl from the source code, the "Configure" script asks you
whether you want to use byacc or bison at one point (maybe it has
detected these first).
------------------------------
Date: Tue, 22 Apr 2008 01:13:29 -0700 (PDT)
From: howa <howachen@gmail.com>
Subject: EPIC : a very good Perl IDE
Message-Id: <ea71f2c2-0c42-4ec6-a238-68601304113f@c19g2000prf.googlegroups.com>
I am not sure anyone is also using EPIC or not, I just found it today,
and the I believe this is perhaps one of the the best free Perl editor
besides komodo edit.
http://e-p-i-c.sourceforge.net/
let's have a try.
Howard
------------------------------
Date: Tue, 22 Apr 2008 08:16:28 -0700 (PDT)
From: smallpond <smallpond@juno.com>
Subject: Re: EPIC : a very good Perl IDE
Message-Id: <fa08b6b0-d6b6-4083-b254-fc5c5fecf93b@m44g2000hsc.googlegroups.com>
On Apr 22, 4:13 am, howa <howac...@gmail.com> wrote:
> I am not sure anyone is also using EPIC or not, I just found it today,
> and the I believe this is perhaps one of the the best free Perl editor
> besides komodo edit.
>
> http://e-p-i-c.sourceforge.net/
>
> let's have a try.
>
> Howard
perldoc -q IDE
------------------------------
Date: Tue, 22 Apr 2008 08:31:55 -0700 (PDT)
From: howa <howachen@gmail.com>
Subject: Re: EPIC : a very good Perl IDE
Message-Id: <15712713-b61c-4459-8737-96a1a6e02e5b@a1g2000hsb.googlegroups.com>
Hi
On 4$B7n(B22$BF|(B, $B2<8a(B11$B;~(B16$BJ,(B, smallpond <smallp...@juno.com> wrote:
> On Apr 22, 4:13 am, howa <howac...@gmail.com> wrote:
>
> > I am not sure anyone is also using EPIC or not, I just found it today,
> > and the I believe this is perhaps one of the the best free Perl editor
> > besides komodo edit.
>
> >http://e-p-i-c.sourceforge.net/
>
> > let's have a try.
>
> > Howard
>
> perldoc -q IDE
wow...the first one in the list.
Thanks.
Howard
------------------------------
Date: Mon, 21 Apr 2008 21:39:54 -0700 (PDT)
From: TonyV <kingskippus@gmail.com>
Subject: Extract javascript strings using regex
Message-Id: <e01e7c96-02ea-44f3-a8e4-057008843957@d45g2000hsc.googlegroups.com>
Hey all, I've been trying to hammer away at this, and I just can't
figure it out. I'm hoping a regular expressions guru can help me out.
I'm trying to parse a retrieved javascript file to extract the
parameters out of a function call. Here's a contrived line that
represents what will be fetched:
foo('parameter 1', 'param with \'single\' quotes', 'param with\"double
\" quotes', 'this param, it has a comma', 'five');
The goal is to get an array with these elements:
parameter 1
param with 'single' quotes
param with "double" quotes
this param, it has a comma
five
There will always be five parameters, and the function name will
always be foo. Normally, I'm handy with regexes, but damn, those
escaped quotes and commas are killing me, and the data does have lots
of them in there.
I'm not lazy, I've been plugging away at this trying to work with look-
behind reference, greedy matching, and so on, but I'm just at an
impasse and can't extract what I want out of it. I've googled various
regex cookbooks (even have access to O'Reilly's Safari), but I've come
up with bupkiss.
Any ideas? I'd surely appreciate any help!
--TonyV
------------------------------
Date: Tue, 22 Apr 2008 05:08:46 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: Extract javascript strings using regex
Message-Id: <x7mynmscgx.fsf@mail.sysarch.com>
>>>>> "T" == TonyV <kingskippus@gmail.com> writes:
T> foo('parameter 1', 'param with \'single\' quotes', 'param with\"double
T> \" quotes', 'this param, it has a comma', 'five');
T> The goal is to get an array with these elements:
T> parameter 1
T> param with 'single' quotes
T> param with "double" quotes
T> this param, it has a comma
T> five
T> Any ideas? I'd surely appreciate any help!
text::balanced should be able to do that easily. it can parse matched
parens, quotes and other top level tokenizing syntax.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Free Perl Training --- http://perlhunter.com/college.html ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Mon, 21 Apr 2008 23:35:04 -0700 (PDT)
From: Ben Bullock <benkasminbullock@gmail.com>
Subject: Re: Extract javascript strings using regex
Message-Id: <a1b3a544-1355-46f3-9c29-c1f3f2760fb8@b5g2000pri.googlegroups.com>
On Apr 22, 1:39 pm, TonyV <kingskip...@gmail.com> wrote:
> I'm trying to parse a retrieved javascript file to extract the
> parameters out of a function call. Here's a contrived line that
> represents what will be fetched:
>
> foo('parameter 1', 'param with \'single\' quotes', 'param with\"double
> \" quotes', 'this param, it has a comma', 'five');
>
> The goal is to get an array with these elements:
> parameter 1
> param with 'single' quotes
> param with "double" quotes
> this param, it has a comma
> five
#! perl
use warnings;
use strict;
my $parameter = qr/'(?:[^']|\\')+'/;
my $test = q/foo('parameter 1', 'param with \'single\' quotes', 'param
with\"double\" quotes', 'this param, it has a comma', 'five')/;
if ($test =~ /foo\s*\(\s*($parameter)\s*,\s*($parameter)\s*,
\s*($parameter)\s*,\s*($parameter)\s*,\s*($parameter)\s*\)/s) {
print "Matched.\n";
print "$1\n$2\n$3\n$4\n$5\n";
}
You could also use
/foo\s*\(\s*(?:$parameter\s*,\s*){4}($parameter)\s*\)/
if you don't need the parameter values right away (e.g. match for them
using another regex later on). That would make the code tidier.
> There will always be five parameters, and the function name will
> always be foo.
Are the parameters necessarily single quoted?
------------------------------
Date: Tue, 22 Apr 2008 11:57:12 GMT
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: Extract javascript strings using regex
Message-Id: <8hkr041qrjme6nb0bv5keo2o1bc4pghupd@4ax.com>
TonyV <kingskippus@gmail.com> wrote:
>I'm trying to parse a retrieved javascript file to extract the
>parameters out of a function call. Here's a contrived line that
>represents what will be fetched:
>
>foo('parameter 1', 'param with \'single\' quotes', 'param with\"double
>\" quotes', 'this param, it has a comma', 'five');
>
>The goal is to get an array with these elements:
>parameter 1
>param with 'single' quotes
>param with "double" quotes
>this param, it has a comma
>five
I think Text::CSV::parse() should do the job just fine.
jue
------------------------------
Date: Tue, 22 Apr 2008 14:48:54 +0100
From: bugbear <bugbear@trim_papermule.co.uk_trim>
Subject: Re: Extract javascript strings using regex
Message-Id: <q_idndGAufFacZDVnZ2dnUVZ8tGqnZ2d@plusnet>
TonyV wrote:
>
> I'm not lazy, I've been plugging away at this trying to work with look-
> behind reference, greedy matching, and so on, but I'm just at an
> impasse and can't extract what I want out of it. I've googled various
> regex cookbooks (even have access to O'Reilly's Safari), but I've come
> up with bupkiss.
IIRC it is *impossible* to fully implement nested matching quotes
with a regexp.
Ah! (google). This sounds helpful:
http://evolt.org/RegEx_Basics#comment-60762
BugBear
------------------------------
Date: 22 Apr 2008 14:32:20 GMT
From: Abigail <abigail@abigail.be>
Subject: Re: Extract javascript strings using regex
Message-Id: <slrng0rtnk.4hq.abigail@alexandra.abigail.be>
_
bugbear (bugbear@trim_papermule.co.uk_trim) wrote on VCCCXLVIII September
MCMXCIII in <URL:news:q_idndGAufFacZDVnZ2dnUVZ8tGqnZ2d@plusnet>:
`' TonyV wrote:
`' >
`' > I'm not lazy, I've been plugging away at this trying to work with look-
`' > behind reference, greedy matching, and so on, but I'm just at an
`' > impasse and can't extract what I want out of it. I've googled various
`' > regex cookbooks (even have access to O'Reilly's Safari), but I've come
`' > up with bupkiss.
`'
`' IIRC it is *impossible* to fully implement nested matching quotes
`' with a regexp.
This was already possible in 5.6, and it even simpler in 5.10.
For instance,
qr [((?:\((?1)*\))*)]
is a regexp to match balanced nested parens.
But the OP isn't asking about nested matching quotes. All he wants is
delimited strings, with escapes.
I'd use Regexp::Common, but it's not hard to come up with a regexp
for a single quote delimited string (untested):
/'[^\\']*(?:\\.[^\\']*)*'/s
Abigail
--
A perl rose: perl -e '@}-`-,-`-%-'
------------------------------
Date: Tue, 22 Apr 2008 18:46:36 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: FAQ 1.12 What's the difference between "perl" and "Perl"?
Message-Id: <x73apdloc4.fsf@mail.sysarch.com>
>>>>> "PS" == PerlFAQ Server <brian@stonehenge.com> writes:
PS> 1.12: What's the difference between "perl" and "Perl"?
PS> You may or may not choose to follow this usage. For example,
PS> parallelism means "awk and perl" and "Python and Perl" look
PS> good, while "awk and Perl" and "Python and perl" do not. But
PS> never write "PERL", because perl is not an acronym, apocryphal
PS> folklore and post-facto expansions notwithstanding.
what good timing! the appropriate official FAQ entry about not writing
PERL shows up soon after the never dying thread on that stupid subject.
and notice how none of the PERL usage flamers are back helping with the
usual questions and problems posted here. the regulars are doing their
jobs as usual. just like i said many times before, you help here, you
can have a say here. otherwise your comments on anything are highly
downgraded.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.sysarch.com --
----- Perl Code Review , Architecture, Development, Training, Support ------
--------- Free Perl Training --- http://perlhunter.com/college.html ---------
--------- Gourmet Hot Cocoa Mix ---- http://bestfriendscocoa.com ---------
------------------------------
Date: Fri, 18 Apr 2008 10:55:16 -0700
From: "szr" <szrRE@szromanMO.comVE>
Subject: Re: FAQ 1.4 What are Perl 4, Perl 5, or Perl 6?
Message-Id: <fuana502rb9@news4.newsguy.com>
PerlFAQ Server wrote:
> This is an excerpt from the latest version perlfaq1.pod, which
> comes with the standard Perl distribution. These postings aim to
> reduce the number of repeated questions as well as allow the community
> to review and update the answers. The latest version of the complete
> perlfaq is at http://faq.perl.org .
>
> --------------------------------------------------------------------
>
> 1.4: What are Perl 4, Perl 5, or Perl 6?
>
> (contributed by brian d foy)
>
> In short, Perl 4 is the past, Perl 5 is the present, and Perl 6 is
> the future.
With all the wonderful developments I see going on with Perl 5 (5.10.0
has a few features, like given/when that were destined for Perl 6), I'm
left wondering if we really need Perl 6. I'm all for the better of
things for the future, but it seems to me Perl 5, especially with the
dawn of 5.10.0, is really holding it's own.
The new features (and I love how you can turn only specific things on,
or turn them all on) are great - I smiled practically all the way
through Perl 5.10.0's perldelata - so I really can't imagine Perl 6
being much better than what Perl 5 has evolved into (and to top it off
it's still pure Perl) :-)
--
szr
------------------------------
Date: Sun, 20 Apr 2008 10:16:47 +0200
From: "Dr.Ruud" <rvtol+news@isolution.nl>
Subject: Re: FAQ 1.4 What are Perl 4, Perl 5, or Perl 6?
Message-Id: <fuf599.1qo.1@news.isolution.nl>
szr schreef:
> I really can't imagine Perl 6
> being much better than what Perl 5 has evolved into (and to top it off
> it's still pure Perl) :-)
I don't think you understand what Perl 6 is about.
A problem is that they called it Perl again, because it is quite a
different beast. I would have liked a different name, like Onion.
One of the things that Perl 6 will stand out in is parallellism, which
is important to get the most out of your 32 cores.
http://dev.perl.org/perl6/doc/design/syn/S03.html
--
Affijn, Ruud
"Gewoon is een tijger."
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V11 Issue 1455
***************************************
