[11036] in Perl-Users-Digest
Perl-Users Digest, Issue: 4636 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jan 13 01:02:49 1999
Date: Tue, 12 Jan 99 22:01:35 -0800
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, 12 Jan 1999 Volume: 8 Number: 4636
Today's topics:
Re: perl cgi (win95) doesn't work with CGI.pm <chatmaster@c-zone.net>
Re: perl cgi (win95) doesn't work with CGI.pm <chatmaster@c-zone.net>
Perl Controlling Server RS-232 Port <cpu2000@nwcis.com>
Re: Perl Criticism dturley@pobox.com
Re: Perl Criticism (Clay Irving)
Re: Perl on Solaris 2.6 breaking (ftp.pl) (Clay Irving)
Re: Problem reading files from a remote server (Ronald J Kimball)
Regular Expression Question parab0la@my-dejanews.com
Renaming a directory in NT. <mivl@inquo.net>
Re: Simple Question lists of lists - please help!! <ebohlman@netcom.com>
Re: tied hashed hash looses item #1 (Ronald J Kimball)
Re: Using require command <morrowp@tcd.ie>
Re: Using require command (Tad McClellan)
Re: Using require command (Ronald J Kimball)
Re: Using require command (Ronald J Kimball)
Re: Verify an email address (Clay Irving)
Re: Verify an email address (Ronald J Kimball)
Re: where is the lexical parser ? (Tad McClellan)
Re: Yet another REGEX question (Ronald J Kimball)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 12 Jan 1999 18:52:20 -0800
From: TRG Software <chatmaster@c-zone.net>
Subject: Re: perl cgi (win95) doesn't work with CGI.pm
Message-Id: <369C0A64.A4CF2BE7@c-zone.net>
Clay Irving wrote:
>
> Edwin Litterst wrote:
>
> >>> A small demo perl script works nice if called from the command line
> >>> but doesn't return anything if CGI.pm is included:
> >>>
> >>> use Cgi;
> >>> print "Content-Type: text/plain\n\n";
> >>> print "Hello, World!\n";
> >>>
> >>> The directory which contains the libs is part of the @INC.
> >>> I read the CGI FAQ as well as the Win32 FAQ but nothing seems to
> >>> apply.
> >>
> >>use Cgi;
> >>OR
> >>use CGI;
> >
> > I tried both - and also other modules (just to see whether loading
> > them would change anything, but only CGI shows this behavior).
>
> Only one is correct -- That's `use CGI;'
I thought he'd know I meant the "right and wrong" ways. I guess I should
have made it clear that it was "use CGI;", rather then possibly giving
the impression that it's either. :-)
>
> >>Why are you wanting to use the CGI.pm, when you already have have the
> >>Content-type for a simple print test?
> >
> > Because this is more or less the smalles example to show this strange
> > behavior.
> > Of course I want to do more (developing some of my CGI scripts under
> > win).
>
> Oh, the pain -- Perl on Windows 95... Nonetheless, this is the version I
> have:
>
> C:\tmp>\perl\bin\perl -v
>
> This is perl, version 5.004_02
>
> Copyright 1987-1997, Larry Wall
>
> Perl may be copied only under the terms of either the Artistic License
> or the
> GNU General Public License, which may be found in the Perl 5.0 source
> kit.
>
> This is example program using CGI.pm:
>
> C:\tmp>more foo.pl
>
> #!/usr/local/bin/perl -w
>
> use CGI qw(:standard);
>
> $time = localtime;
>
> print header,
> start_html(-title=>'Time Page', -author=>'clay@panix.com'),
> "time is $time",
> end_html();
>
> It prints this:
>
> C:\tmp>\perl\bin\perl foo.pl
> Ambiguous use of title => resolved to "title" => at foo.pl line 8.
> (offline mode: enter name=value pairs on standard input)
> Content-type: text/html
>
> (press CTRL-Z)
>
> <!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML//EN">
> <HTML><HEAD><TITLE>Time Page</TITLE>
> <LINK REV=MADE HREF="mailto:clay@panix.com">
> </HEAD><BODY>time is Tue Jan 12 03:25:41 1999</BODY></HTML>
> C:\tmp>
>
> Give it a try on your system.
>
> --
> Clay Irving
> clay@panix.com
--
Regards,
Tim Greer - chatmaster@c-zone.net
TRG Software and The Link Worm
http://www.linkworm.com
The Chat Base
http://www.chatbase.com
------------------------------------------------------------
* Creator of Paradise Chat, Chat Central & Spiral Chat
* Receiving over 250,000+ hits a day from users Worldwide!!!
* Sales of custom chat server scripts * CGI/Perl scripting
* Script trouble shooting/security * Modify & debug scripts
* Freelance Perl Scripting for any purpose or application
Copyright ) 1999 TRG Software and The Link Worm.
------------------------------
Date: Tue, 12 Jan 1999 18:57:06 -0800
From: TRG Software <chatmaster@c-zone.net>
Subject: Re: perl cgi (win95) doesn't work with CGI.pm
Message-Id: <369C0B82.E44CC9C0@c-zone.net>
Edwin Litterst wrote:
>
> >> A small demo perl script works nice if called from the command line
> >> but doesn't return anything if CGI.pm is included:
> >>
> >> use Cgi;
> >> print "Content-Type: text/plain\n\n";
> >> print "Hello, World!\n";
> >>
> >> The directory which contains the libs is part of the @INC.
> >> I read the CGI FAQ as well as the Win32 FAQ but nothing seems to
> >> apply.
> >
> >use Cgi;
> >OR
> >use CGI;
>
> I tried both - and also other modules (just to see whether loading
> them would change anything, but only CGI shows this behavior).
Sorry, I meant that as an example of which was right and which was
wrong. Check out Clay Irvings' post and see if that works.
>
> >print "Hello, World!\n"; #nothing wrong here..
>
> :-)
>
> >Why are you wanting to use the CGI.pm, when you already have have the
> >Content-type for a simple print test?
>
> Because this is more or less the smalles example to show this strange
> behavior.
> Of course I want to do more (developing some of my CGI scripts under
> win).
I understand. I assume it works fine without the use of the CGI.pm? If
so, then that's good. BTW, I'm using (at home) Win95 with activestate's
version 5.005_02 and it works great. I am having no problems with any of
the modules. I've used it with both a small OhmniHttpd server and
xitami, which are free (and I don't have the URL to them).
>
> >Anyway, you're trying. So next step is to read some documentation, or
> >some books, or both. O'reilly has very good Perl books, i.e., Learning
> >Perl, Programming Perl, and the Perl Cookbook. And the documentation
> >should come with Perl.
>
> I already have several years of experience with perl - but only under
> unix. The only thing I'd like to know is how to get the same stuff
> running und win95.
Are you having any other problems? I don't even recall if you said what
version of perl you're using,.. sorry.
> BTW, I am using perl as distributed with the normal perl package and
> tinyweb as server.
>
> Eddie
Let me know if anything works at all. Or if you've gotten any modules to
work. Did they come with the perl you got, or did you download them
yourself and install them in hopes they will work with Perl?
--
Regards,
Tim Greer - chatmaster@c-zone.net
TRG Software and The Link Worm
http://www.linkworm.com
The Chat Base
http://www.chatbase.com
------------------------------------------------------------
* Creator of Paradise Chat, Chat Central & Spiral Chat
* Receiving over 250,000+ hits a day from users Worldwide!!!
* Sales of custom chat server scripts * CGI/Perl scripting
* Script trouble shooting/security * Modify & debug scripts
* Freelance Perl Scripting for any purpose or application
Copyright ) 1999 TRG Software and The Link Worm.
------------------------------
Date: Tue, 12 Jan 1999 21:43:10 -0600
From: Steve Shawl <cpu2000@nwcis.com>
Subject: Perl Controlling Server RS-232 Port
Message-Id: <369C164D.BFCAFC99@nwcis.com>
Hello
Is there a perl command or set of commands that will allow a script to
output a single character to the rs-232 port of the server that the
script is running on?
Thank you (in advance)
Steve Shawl
------------------------------
Date: Wed, 13 Jan 1999 02:18:58 GMT
From: dturley@pobox.com
Subject: Re: Perl Criticism
Message-Id: <77gvqa$jrq$1@nnrp1.dejanews.com>
In article <77g7p5$f1n$1@nnrp2.dejanews.com>,
topmind@technologist.com wrote:
> Perler's actually have
> contests to see who can write and read the most cryptic code.
> "Nerd Machoism" is what I call it.
So? Just because you _can_ do something that makes no sense, youshould scrap
the ability? People drive their cares really fast and die, should we take out
the gas pedals?
Guess you'll have to call me a name again.
David, still not afraid to sign my naame.
____________________________________
David Turley
dturley@pobox.com
http://www.binary.net/dturley/
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 13 Jan 1999 03:03:23 GMT
From: clay@panix.com (Clay Irving)
Subject: Re: Perl Criticism
Message-Id: <77h2dr$dsr$1@news.panix.com>
In <369BF423.F349B0EC@mediaone.net> "Michael D. Schleif" <mds-resource@mediaone.net> writes:
Be a little more description in your error messages.
>for (keys %liquour_cabinet) {
> open($_) or die;
>}
for (keys %liquour_cabinet) {
open($_) or die "Gasp! I'm thirsty...\n";
}
--
Clay Irving
clay@panix.com
------------------------------
Date: 13 Jan 1999 03:25:58 GMT
From: clay@panix.com (Clay Irving)
Subject: Re: Perl on Solaris 2.6 breaking (ftp.pl)
Message-Id: <77h3o6$e6n$1@news.panix.com>
In <77glql$b9b$1@nnrp1.dejanews.com> tariqx@my-dejanews.com writes:
>Hello All: I have a Sun Ultra 1 running Solaris 2.6. I had perl 5.004
>installed on it for a while now and been working just fine. I needed to use
>to ftp.pl for a small ftp script in perl. It broke on chat2.pl not finding
>socket.ph ! i finally found out that I had to run h2ph since it didn't run
>for some reason! I also downloaded the binary distributon of perl 5.005_02
>and recompiled it and re-ran h2ph. The script is: #!/apps/local/bin/perl
>require "ftp.pl";
Personally, I'd use Net::FTP (part of the libnet bundle).
>$ftpHost = "<my dest-host-name>";
>if (&ftp::open($ftpHost,21,0,1) !=1) {
> die "Can't open $ftpHost\n" ;
>}
>if (&ftp::login("<my_user_id>","<my_password>") != 1 ) {
> die "Can't Login\n";
>}
>if (($PWD=&ftp::pwd) eq "") {
> die "Can't get pwd" ;
>}
>print "pwd=$PWD" ;
>&ftp::close
>The script breaks with these messages: Bareword found where operator expected
>at /apps/local/lib/perl5/site_perl/5.005/ sun4-solaris/sys/feature_tests.ph
>line 20, near """invalid" (Missing operator before invalid?) Bareword found
>where operator expected at /apps/local/lib/perl5/site_perl/5.005/
>sun4-solaris/sys/feature_tests.ph line 20, near "invalid _FILE_OFFSET_BITS"
>(Do you need to predeclare invalid?) String found where operator expected at
>/apps/local/lib/perl5/site_perl/5.005/su n4-solaris/sys/feature_tests.ph line
>20, near "specified""" syntax error at
>/apps/local/lib/perl5/site_perl/5.005/sun4-solaris/sys/feature_t ests.ph line
>20, near """invalid "
Its a bug that's fixed in newer versions (not the latest stable release) of
Perl. Go to /apps/local/lib/perl5/site_perl/5.005/sun4-solaris/sys/ -- grep
for: grep \"\" *\.ph -- and change the duplicate double quotes to a single
pair of quotes (if that makes sense?) -- Like this:
(""Howdy"");
to
("Howdy");
Check line 20 in feature_test.ph for sure.
--
Clay Irving
clay@panix.com
------------------------------
Date: Wed, 13 Jan 1999 00:31:05 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Problem reading files from a remote server
Message-Id: <1dljjks.irk1n01cypcjgN@bay1-357.quincy.ziplink.net>
Per Kistler <kistler@gmx.net> wrote:
> > $path = " \\Nebula\projects " ;
>
> ...looses one '\', so rather: '\\Nebula\...'
> or "\\\\Nebula\\..." :-)
'\\Nebula\...' also loses one backslash. \' and \\ are valid escape
sequences within single quotes.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Wed, 13 Jan 1999 05:43:05 GMT
From: parab0la@my-dejanews.com
Subject: Regular Expression Question
Message-Id: <77hbp8$u10$1@nnrp1.dejanews.com>
Hi all!
I'm try to match the pattern /helloworld/ or /byeworld/. Is there any way
that I can combine them in one regexp, something like /\(hello|bye\)world/ ?
Thx!
:Parabola
+++++++++++++++++++++++++++++++++++++++
Parabola - the famous curve.
URL: http://move.to/origin/
+++++++++++++++++++++++++++++++++++++++
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 12 Jan 1999 22:45:11 -0700
From: Kris Davey <mivl@inquo.net>
Subject: Renaming a directory in NT.
Message-Id: <369C32E7.6BA6E499@inquo.net>
--------------C0FAAC21AB25008FEB61DB45
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
I have a quick question that has been kicking my ass for a while now. It
should be very simple and I'm probably overlooking something. Here's the
problem I have created a script that FTP's trace files off our solaris
server to make them available to everyone on a Windows platform. The
script creates a \tmp directory FTp's all the files into the directory,
pulls the current date and formats it. The problem is that I cannot seem
to rename the file to the date, stored in $_. Here is what I've tried
`ren e:\tmp $_`
`ren e:\tmp "$_"`
system ("ren e:\tmp $_") *** This actually worked on Win98 at home.
I've also tried, out of frustration setting $x = $_ and renaming to $x.
not that it makes any difference. I used the PERL debugger and saw that
both values held the formatted date before and after the rename
statement.
I've read tried looking it up in Learning Perl on WIN32 Systems,
Learning Perl, Programming Perl, Perl 5 Interactive Course, and PERL by
Example. The Learning Perl on WIN32 Systems went into renaming files but
no directories. I've looked through the online PERL documentation and
even gone so far as to look into finding a module to do this simple,
little task. If anyone could shed any insight into this mysterious
problem I would very much appreciate it. Thanks in advance I hope.
Kris Davey
**** You have repositioned your mouse, you must reboot for changes to
take effect. ****
--------------C0FAAC21AB25008FEB61DB45
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit
<!doctype html public "-//w3c//dtd html 4.0 transitional//en">
<html>
I have a quick question that has been kicking my ass for a while now. It
should be very simple and I'm probably overlooking something. Here's the
problem I have created a script that FTP's trace files off our solaris
server to make them available to everyone on a Windows platform. The script
creates a \tmp directory FTp's all the files into the directory, pulls
the current date and formats it. The problem is that I cannot seem to rename
the file to the date, stored in $_. Here is what I've tried
<br>`ren e:\tmp $_`
<br>`ren e:\tmp "$_"`
<br>system ("ren e:\tmp $_") *** This actually worked on Win98 at
home.
<p>I've also tried, out of frustration setting $x = $_ and renaming to
$x. not that it makes any difference. I used the PERL debugger and saw
that both values held the formatted date before and after the rename statement.
<p>I've read tried looking it up in <i>Learning Perl on WIN32 Systems,
Learning Perl, Programming Perl, Perl 5 Interactive Course, and PERL by
Example. </i>The <i>Learning Perl on WIN32 Systems </i>went into renaming
files but no directories. I've looked through the online PERL documentation
and even gone so far as to look into finding a module to do this simple,
little task. If anyone could shed any insight into this mysterious problem
I would very much appreciate it. Thanks in advance I hope.
<br>
<p>Kris Davey
<p>**** You have repositioned your mouse, you must reboot for changes to
take effect. ****</html>
--------------C0FAAC21AB25008FEB61DB45--
------------------------------
Date: Wed, 13 Jan 1999 03:09:11 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: Simple Question lists of lists - please help!!
Message-Id: <ebohlmanF5HA3B.An3@netcom.com>
Dave Underwood <dave.f.underwood@Vanderbilt.edu> wrote:
: I'm trying to do something really simple but can't. I have a standard
: txt file that when builds looks like: (pipe delimited)
: a1|a2|a3|a4
: aa1|aa2|aa3|aa4
: aaa1|aaa2|aaa3|aaa4
: what i need to do is have a script produce an html page which will
: output the data as:
: "Column One:"
: a1
: aa1
: aaa1
: "Column Two:"
: a2
: aa2
: aaa2
I think a two-dimensional array (array of arrays) would come in very
handy here. perldoc perllol to learn all about such structures.
------------------------------
Date: Wed, 13 Jan 1999 00:31:06 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: tied hashed hash looses item #1
Message-Id: <1dljjvg.1h7m6dujtgrvN@bay1-357.quincy.ziplink.net>
JPAH-FLA <mymail@nospam.com> wrote:
> dbmopen %h, $DB, 0766 || die "cant open DBM: $!\n";
I don't think this line does what you expect... Look up operator
precedence in perlop, and then change that to one of:
dbmopen(%h, $DB, 0766) || die "cant open DBM: $!\n";
dbmopen %h, $DB, 0766 or die "cant open DBM: $!\n";
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Wed, 13 Jan 1999 02:45:27 -0000
From: "Peter Morrow" <morrowp@tcd.ie>
Subject: Re: Using require command
Message-Id: <77h14c$ftc$1@news.indigo.ie>
The require info in the documentation seems to have little correlation to
what I'm trying to do. I think what I'm trying is too basic.
Firstly which file must return true? One file just has a sub which prints
some html and the other has a program which creates the rest of the web
page.
As I'm taking the program straight from a book I thought there shouldn't be
a problem.
The book is telling me to put in code like this:
#!c:/perl/bin/perl.exe
require "htmlhead.pl";
&HTML_Header("Perl meets the WWW"); #HTML_Header is sub in file htmlhead
(works when
# sub placed below body of program)
print "<BODY>", "\n";
print "<H1>Hello, World!</H1>", "\n";
etc...
Wherever the require statement is placed that is where the program stops
running when placed on server and run through browser.
If explanation long dont go out of your way.
Thanks
Peter
Hows the weather in Seattle?
I miss that place.
I lived there for a year before I started college.
One of my 2 favourite cities. There and Dublin.
P
------------------------------
Date: Tue, 12 Jan 1999 21:58:06 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Using require command
Message-Id: <ek5h77.sq.ln@magna.metronet.com>
Peter Morrow (morrowp@tcd.ie) wrote:
: One problem I've had is that the require command wont work. When I
: check the file in dos I get an message saying <filename required>.pl did not
: return a true value at <file in which program is running>.pl line x.
: Any ideas?
Yes.
Try looking up the error message in the documentation for
error messages (perldiag.pod)
---------------------------
=item %s did not return a true value
(F) A required (or used) file must return a true value to indicate that
it compiled correctly and ran its initialization code correctly. It's
traditional to end such a file with a "1;", though any true value would
do. See L<perlfunc/require>.
---------------------------
End your required file with
1;
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 13 Jan 1999 00:31:07 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Using require command
Message-Id: <1dljjyv.1hjp2w31ypaxr8N@bay1-357.quincy.ziplink.net>
Peter Morrow <morrowp@tcd.ie> wrote:
> I'm trying to learn Perl at the moment to use in part of my final year
> project. One problem I've had is that the require command wont work. When I
> check the file in dos I get an message saying <filename required>.pl did not
> return a true value at <file in which program is running>.pl line x.
That error message means pretty much what it says.
perldiag explains:
%s did not return a true value
(F) A required (or used) file must return a true value
to indicate that it compiled correctly and ran its
initialization code correctly. It's traditional to
end such a file with a "1;", though any true value
would do. See the require entry in the perlfunc
manpage.
You have been reading the documentation, haven't you?
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Wed, 13 Jan 1999 00:51:59 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Using require command
Message-Id: <1dljozv.435ewztm0u8mN@bay1-357.quincy.ziplink.net>
Peter Morrow <morrowp@tcd.ie> wrote:
> require "htmlhead.pl";
The last line in htmlhead.pl should be:
1;
Thus, it will return a true value.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 13 Jan 1999 03:09:17 GMT
From: clay@panix.com (Clay Irving)
Subject: Re: Verify an email address
Message-Id: <77h2ot$duu$1@news.panix.com>
In <m1yan86oqx.fsf@halfdome.holdit.com> merlyn@stonehenge.com (Randal L. Schwartz) writes:
>>>>>> "Bart" == Bart Lateur <bart.lateur@skynet.be> writes:
>Bart> But the Perl Reference knows about it.
>Bart> http://reference.perl.com/query.cgi?mail+index
>>> Email::Valid -- Module
>>> This module determines whether an e-mail address conforms to the
>>> RFC822 specification. Optionally, additional tests/modifications are
>>> performed on the address to correct common addressing errors, identify
>>> invalid addresses within specific domains, verify that a DNS entry
>>> exists for the domain, and ensure that the address is fully qualified.
>>> http://olympia2.adhost.com/~maurice/
>This is broken then. It should be in the CPAN. If it's not in the CPAN,
>I can't easily convince people to use it.
>I was only half joking when I said "if it's not in the CPAN, it
>doesn't exist".
I cc'd the author -- Maybe he'll upload it to CPAN given the interest in
the module.
--
Clay Irving
clay@panix.com
------------------------------
Date: Wed, 13 Jan 1999 00:31:08 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Verify an email address
Message-Id: <1dljk37.zeprwoijjyqtN@bay1-357.quincy.ziplink.net>
John Moreno <phenix@interpath.com> wrote:
> He probably didn't know about it which leads to my point -- a total lack
> of research shouldn't be dismissed as simply "ethnocentric", assuming
> that everybody will understand what you mean by "MonicaGate" is
> ethnocentric, using (com|net|edu|gov|ca|org) as the tld is simply wrong.
Too bad. I say he was being ethnocentric.
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Tue, 12 Jan 1999 22:14:49 -0600
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: where is the lexical parser ?
Message-Id: <pj6h77.sq.ln@magna.metronet.com>
Yao Xu (dy257@cleveland.Freenet.Edu) wrote:
: Can some one point out to me which file or group of files
: which are the lexical parsing functions in Perl (language
^^^
: itself)?
I don't know about perl's internals, but I know how to
use my system to get hints. cd to the directory with
the perl source code in it and:
grep -c lex *.c | sort -n -r -t : +1
toke.c:313
op.c:27
pp_ctl.c:14
perl.c:6
regexec.c:2
pp_hot.c:2
perly.c:2
pp.c:1
mg.c:1
[ snip a bunch with zero ]
start at the top of the list...
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 13 Jan 1999 00:31:09 -0500
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Yet another REGEX question
Message-Id: <1dljkif.1ccpahi1csvoabN@bay1-357.quincy.ziplink.net>
John Moreno <phenix@interpath.com> wrote:
> The [+-] was indeed in case there was a sign present, * means zero or
> more, since the ? means to use a non-greedy match, and that's irrelevant
> at that point, I didn't use it (and the more strict test would have been
> [+-]{0,1} to make sure that there wasn't more than one).
{0,1}...
?, anyone?
--
_ / ' _ / - aka - rjk@linguist.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 12 Dec 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
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.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
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 V8 Issue 4636
**************************************
