[6393] in Perl-Users-Digest
Perl-Users Digest, Issue: 18 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Feb 26 17:37:23 1997
Date: Wed, 26 Feb 97 14:00:27 -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 Wed, 26 Feb 1997 Volume: 8 Number: 18
Today's topics:
Re: A very novice question (Honza Pazdziora)
Re: Alarm signal caught--program dies <eryq@enteract.com>
assigning ascii character to a variable dh@rutile.iucr.ac.uk
Re: Class library to make C++ more Perlish? <austern@isolde.mti.sgi.com>
Re: Class library to make C++ more Perlish? <rra@cs.stanford.edu>
copy a hdd 1:1 (Alex)
cp, copy, sysread/write (The next Pele)
Re: cp, copy, sysread/write (I R A Aggie)
dbm problem <markov@nortel.ca>
Re: Determine perl program memory usage <tchrist@mox.perl.com>
flock question (Rand Simberg)
Re: flock question (Honza Pazdziora)
Re: flock question (Rand Simberg)
Re: Formatting numbers <rra@cs.stanford.edu>
Re: Forms AHHHH...Help !!! (Nathan V. Patwardhan)
Re: futur de perl et java-script (I R A Aggie)
Re: help. perl Q. (fwd) <rra@cs.stanford.edu>
How to keep parent processing running until child exits <dennerbw@lmco.lmtas.com>
HTML:: (Angel Leyva)
Re: HTML:: (Nathan V. Patwardhan)
Re: HTML:: (Nathan V. Patwardhan)
Re: HTML:: <eryq@enteract.com>
Is numeric or alphabetic??? (Daniel Fournier)
Links Related To comp.lang.perl.misc - FREE ACCESS 0226 links@m2c.com
Re: macperl help (2nd post) <jerrym@ibmoto.com>
MS Access database access from Perl for Win32 (Phil Hanna)
Re: mSQL calls from Perl (Frank D. Cringle)
Re: Multi-line processing (Mike Stok)
new win32::ODBC("DSN") <ted.wang@bowne.com>
newbie question:manipulating strings <jfreed@sigma6.com>
Re: newbie question:manipulating strings (Mik Firestone)
Re: Oracle DB Access from PERL 5!! <ted.wang@bowne.com>
Re: Oracle DB Access from PERL 5!! (Bill Kannawin)
Problems reading file using <> operator (Daniel Rasmussen)
Problems seeing files thru links/NSF? (Albert W. Dorrington)
Re: Problems seeing files thru links/NSF? (Albert W. Dorrington)
Re: Question on "eval" (M.J.T. Guy)
Re: replaceing stuff <tchrist@mox.perl.com>
shuffle an array (Darwin O.V. Alonso)
Re: Standalone environment <nealnach@dlgef.cr.usgs.gov>
system() command problem <73414.1161@CompuServe.COM>
Re: Tap, tap, anyone here ? (Mike Stok)
Re: The fabulous pink camel (or red, if you prefer that <rra@cs.stanford.edu>
Re: Using a variable for mode in chmod and mkdir <rra@cs.stanford.edu>
Re: Using a variable for mode in chmod and mkdir (M.J.T. Guy)
Re: Which one is the best (pattern matching) <rra@cs.stanford.edu>
Digest Administrivia (Last modified: 8 Jan 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 26 Feb 1997 17:23:49 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: A very novice question
Message-Id: <adelton.856977829@aisa.fi.muni.cz>
avi@tase.co.il (Avi) writes:
> Hello !
>
> Here is a very novice question.
Yes. We read it already in the subject. Please read the periodic
posting about Choosing good subject lines.
> I want to remove trailing and leading spaces from a string.
>
> i.e:
>
> " this is the input ";
>
> "this is the output";
So that you subject ought to be: Removing trailing and leading spaces.
Possible answer is: s/^\s+|\s+$//g;
Hope this helps.
[CC-ed to avi@tase.co.il]
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
I can take or leave it if I please
------------------------------------------------------------------------
------------------------------
Date: Wed, 26 Feb 1997 12:08:51 -0600
From: Eryq <eryq@enteract.com>
To: Elliott McCrory <mccrory@fnal.gov>
Subject: Re: Alarm signal caught--program dies
Message-Id: <33147C33.BA8B044@enteract.com>
Elliott McCrory wrote:
> $SIG{ALRM} = \&mysub;
...
> sub mysub {
> print "Alarm signal caught\n";
> return; # Effect is the same with and without this return
> }
>
Try this instead:
sub mysub {
syswrite(STDERR, "Signal caught\n", 14);
}
Virtual no stdio libraries are re-entrant; if you attempt to do
a print() in a signal handler which was invoked at a time when
stdio was currently being done, odds are the FILE data structures
are in an inconsistent state, and your program will crash.
One way to get around this is to bypass stdio, as I did above.
Unless you're exceedingly careful, the only safe things to do
inside a signal handler are: set a variable, and exit.
And in the first case, you should only set a variable in
such a way that malloc() is not called.
As I understand it, there may be the ability to compile your Perl
with the sfio (safe, fast I/O) library, instead of stdio.
Also, I know that Perl provides its own malloc; for all I know,
that malloc is re-entrant as well. But if you do this and depend
on it, your script won't be portable.
Hope this helps,
--
___ _ _ _ _ ___ _ Eryq (eryq@enteract.com)
/ _ \| '_| | | |/ _ ' / Hughes STX, NASA/Goddard Space Flight Cntr.
| __/| | | |_| | |_| | http://www.enteract.com/~eryq
\___||_| \__, |\__, |__
|___/ |___/ UNIX-FM: more talk ; less yacc yacc yacc
------------------------------
Date: Wed, 26 Feb 1997 11:05:23 -0600
From: dh@rutile.iucr.ac.uk
Subject: assigning ascii character to a variable
Message-Id: <856976213.7493@dejanews.com>
How do you assign a character to a variable using just its ascii
number.
e.g.,
octal value for ascii 'A' is 101
so I can
print "\101";
and it prints A, but how to i do this
$a=101;
$b="\$a";
I want $b to contain A. not a reference to $a
-------------------==== Posted via Deja News ====-----------------------
http://www.dejanews.com/ Search, Read, Post to Usenet
------------------------------
Date: 26 Feb 1997 09:52:28 -0800
From: Matt Austern <austern@isolde.mti.sgi.com>
Subject: Re: Class library to make C++ more Perlish?
Message-Id: <fxtlo8bxxnn.fsf@isolde.mti.sgi.com>
Russ Allbery <rra@cs.stanford.edu> writes:
>
> In comp.lang.perl.misc, Charlton Barreto <charltoN@illustra.com> writes:
>
> > Did you intend Perl to be flexible enough for *any* sort of software
> > development? Would you build an OS, real-time application,
> > flop-intensive program, etc., etc. in Perl? You would spend the time to
> > build a quickie wrapper script in C++?
>
> Until the language standard stabilized and the compilers got better at
> optimizing out the cruft introduced by the language, I wouldn't write any
> of those applications in C++ either. If you're worried about speed, C is
> still the way to go. Operator overloading, virtual method calls, and the
> like are major performance hits, as are the lack of realloc(), memcpy(),
> and similar operations.
C++ has both realloc and memcpy. I've used both of those functions in
my C++ programs. (Not to mention printf, memcmp, and memset.) The
entire standard C library is part of the standard C++ library.
I'd be interested in measurements showing that operator overloading
causes performance problems, by the way, especially if you've made
those measurements using recent SGI compilers. There's no good reason
why compilers shouldn't handle a function called operator*() just as
well as they handle a function called multiply(). My experience is
that most compilers do deal with overloaded operators fairly well, but
I'm entirely willing to believe that there are still some compilers
out there that have problems.
One thing I definitely agree with is that you shouldn't use every new
"cool" feature of a language just because it's there, and that you
should understand the performance implications of what you're doing.
Measuring performance is often a very enlightening experience.
------------------------------
Date: 26 Feb 1997 09:16:35 -0800
From: Russ Allbery <rra@cs.stanford.edu>
Subject: Re: Class library to make C++ more Perlish?
Message-Id: <qumg1yjxzbg.fsf@cyclone.stanford.edu>
In comp.lang.perl.misc, Charlton Barreto <charltoN@illustra.com> writes:
> Did you intend Perl to be flexible enough for *any* sort of software
> development? Would you build an OS, real-time application,
> flop-intensive program, etc., etc. in Perl? You would spend the time to
> build a quickie wrapper script in C++?
Until the language standard stabilized and the compilers got better at
optimizing out the cruft introduced by the language, I wouldn't write any
of those applications in C++ either. If you're worried about speed, C is
still the way to go. Operator overloading, virtual method calls, and the
like are major performance hits, as are the lack of realloc(), memcpy(),
and similar operations.
> But the advantages to C++ among 3GLs is that you can stick to a single
> 3GL to accomplish all of your needs.
Anyone writing text processing applications in C++ is probably doing far
more work than they need to. Sticking to one language to accomplish all
of your needs is the standard "when all you have is a hammer" mentality.
Different languages are useful for different purposes.
80% of what I write I write in Perl because Perl is expressive, intuitive,
convenient, doesn't require compilation and therefore has a *much* faster
development/debug cycle, and is *far* better at handling text processing,
network connections, associative arrays, and a variety of similar things
in a portable fashion than either C or C++ is. The other 20% I write in
either C or C++, preferring C to C++ unless I actually need the concept of
inheritance or templates for some reason.
Except for a few things I write in Bourne shell, just because that's still
the most convenient from time to time. And the times when I write in
Lisp.
Claiming anyone should use any one language for everything they do is dumb
in this day and age, and any language with that as its goal is
ill-conceived. C, and to a lesser extent C++, are fast and offer better
access to operating system internals, and are more flexible at the low
level.
> Jonathan King addresses some very important issues and aspects of Perl's
> three types and Perl arrays that you should consider (good job,
> jking). With his apt arguments in mind I feel I can say that C++'s STL
> <vector>s are superior from any POV because you can implement
> functionality you need that *isn't* implemented or implementable in Perl
> (or in C).
This paragraph highlights a recurring theme in your response, which
basically says "I like C++ because it lets me write whatever I want if the
facility isn't already available." I agree that this can *SOMETIMES* be
more difficult to do in Perl, although a lot less than you appear to
think. However, I'd also like to point out that people who are just
trying to get their work done generally prefer to have a language that
already has all of the common case implemented for them. The fact that I
*can* write something in C++ doesn't help me finish my project any faster.
Overall, I do find it interesting that quite a few of your complaints
about Perl from your perspective can equally well be levelled at C++ by a
C programmer.
--
Russ Allbery (rra@cs.stanford.edu) <URL:http://www.eyrie.org/~eagle/>
------------------------------
Date: Wed, 26 Feb 1997 17:26:01 GMT
From: alex@noet.at (Alex)
Subject: copy a hdd 1:1
Message-Id: <5f1rlc$tbg@m2.atnet.at>
software for ms-dos PC
i need a programm to copy a hardisk to a second harddsik (same type)
read a hlock from hd1
write this block to the same sector/place th hd2
if it takes to much work - tell me how to do it by my self
thanks in advice
alex@noet.at
------------------------------
Date: 26 Feb 1997 19:52:23 GMT
From: gt1535b@acmey.gatech.edu (The next Pele)
Subject: cp, copy, sysread/write
Message-Id: <5f249n$au7@catapult.gatech.edu>
Hey there.
I've got a problem with copying. I'm trying to port a script that was
written on Unix to the win95 version of perl. The original script has a
has a shell copy in it (`cp $from $to`) and I'm trying to make a cp function
in perl that will work on both Unix and dos. It's a .Z file. If I use a
dos shell command it will work (`copy /B $from $to /B`), but I would like
to use a perl subroutine instead. I've tried normal printing with $/ set
to '', and I've also tried using the sysread/write example given in the red
(or pink?) camel book (pg. 192). Neither has worked. Any suggestions?
thanks,
Daryl
--
<>< Daryl Bowen <><
Georgia Institute of Technology
Internet: gt1535b@prism.gatech.edu
Siemens Stromberg-Carlson Co-op
------------------------------
Date: Wed, 26 Feb 1997 15:10:05 -0500
From: fl_aggie@hotmail.com (I R A Aggie)
Subject: Re: cp, copy, sysread/write
Message-Id: <fl_aggie-ya02408000R2602971510050001@news.fsu.edu>
In article <5f249n$au7@catapult.gatech.edu>, gt1535b@acmey.gatech.edu (The
next Pele) wrote:
[about system-independent emulation of the unix cp command]
+ Neither has worked. Any suggestions?
NAME
File::Copy - Copy files or filehandles
SYNOPSIS
use File::Copy;
copy("file1","file2");
copy("Copy.pm",\*STDOUT);'
use POSIX;
use File::Copy cp;
$n=FileHandle->new("/dev/null","r");
cp($n,"x");'
Check it out.
James
--
Consulting Minster for Consultants, DNRC
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Wed, 26 Feb 1997 13:13:23 -0500
From: Marko Vasiljevic <markov@nortel.ca>
Subject: dbm problem
Message-Id: <33147D43.7892@nortel.ca>
HI!
I'm working in Perl 4.0 and I encountered an interesting problem.
Since I have to do a search on a keyword I decided to use a dbm file
to store key/value pairs for easy access. When I run my script which
looks through gobs of HTML files, takes the titles and indexes them an
error occurs after about 40 files saying something like this:
dbm store returned -1, errno 28, key "Vector" at indexsite.pl line 51,
<file> line 3.
I am pretty sure that this is due to the limited number of values per
key per dbm file and I'm looking for suggestions on how to solve this
problem.
If you can help please e-mail me at: markov@nortel.ca
Cheers,
Marko
------------------------------
Date: 26 Feb 1997 17:59:10 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Determine perl program memory usage
Message-Id: <5f1tle$sqb$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
kst@sd.aonix.com (Keith Thompson) writes:
:In <5eku6r$cl0$1@csnews.cs.colorado.edu> Tom Christiansen <tchrist@mox.perl.com> writes:
:[...]
:> system "ps l$$";
:
:This won't work in all versions of Unix. For example, it works under
:SunOS 4.x, but not Solaris 2.x. (I suppose it's a System V thing.)
:
:I think the Solaris equivalent is "ps -l -p $$".
Solaris is idiotic. There was no need to break ps.
Linux proves that you can support both argument forms.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
"It is easier to port a shell than a shell script."
--Larry Wall
------------------------------
Date: Wed, 26 Feb 1997 16:40:55 GMT
From: simberg@interglobal.org (Rand Simberg)
Subject: flock question
Message-Id: <33146660.169919988@nntp.ix.netcom.com>
Maybe there's an obvious answer to this, but I'm concerned about how
to use flock. If I want to update a file, I need to open it for a
rewrite, but if I do this, I lose all of the data in it before I can
process it. So I open it for read only first, read the data, close
it, and then reopen it for a rewrite. Each time I do this, I lock it,
but I'm concerned that another program instance will grab the file in
between the time that I close it for the read, and reopen it for the
rewrite.
How do I ensure that I have exclusive use of the file throughout the
period in which I need to both read and rewrite it? Can I do an open
for rewrite (with a different filehandle) before I close the read
filehandle?
************************************************************************
simberg@interglobal.org * 310 372-7963 (CA) 307 739-1296 (Jackson Hole)
interglobal space lines * 307 733-1391 (Fax) http://www.interglobal.org
"Extraordinary launch vehicles require extraordinary markets..."
------------------------------
Date: Wed, 26 Feb 1997 17:21:27 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: flock question
Message-Id: <adelton.856977687@aisa.fi.muni.cz>
simberg@interglobal.org (Rand Simberg) writes:
> Maybe there's an obvious answer to this, but I'm concerned about how
> to use flock. If I want to update a file, I need to open it for a
> rewrite, but if I do this, I lose all of the data in it before I can
> process it. So I open it for read only first, read the data, close
I found this in the man-page for open:
If the filename begins with ``<'' or nothing, the file is opened for
input. If the filename begins with ``>'', the file is opened for
output. If the filename begins with ``>>'', the file is opened for
appending. You can put a '+' in front of the '>' or '<' to indicate
that you want both read and write access to the file; thus '+<' is
usually preferred for read/write updates--the '+>' mode would clobber
the file first. These correspond to the fopen(3) modes of 'r', 'r+',
'w', 'w+', 'a', and 'a+'.
So +< is enough.
Hope this helps.
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
I can take or leave it if I please
------------------------------------------------------------------------
------------------------------
Date: Wed, 26 Feb 1997 18:07:50 GMT
From: simberg@interglobal.org (Rand Simberg)
Subject: Re: flock question
Message-Id: <33147bd9.175417958@nntp.ix.netcom.com>
On Wed, 26 Feb 1997 17:21:27 GMT, in a place far, far away,
adelton@fi.muni.cz (Honza Pazdziora) made the phosphor on my monitor
glow in such a way as to indicate that:
>If the filename begins with ``<'' or nothing, the file is opened for
>input. If the filename begins with ``>'', the file is opened for
>output. If the filename begins with ``>>'', the file is opened for
>appending. You can put a '+' in front of the '>' or '<' to indicate
>that you want both read and write access to the file; thus '+<' is
>usually preferred for read/write updates--the '+>' mode would clobber
>the file first. These correspond to the fopen(3) modes of 'r', 'r+',
>'w', 'w+', 'a', and 'a+'.
>
>So +< is enough.
>
>Hope this helps.
Thanx--that's exactly what I needed.
************************************************************************
simberg@interglobal.org * 310 372-7963 (CA) 307 739-1296 (Jackson Hole)
interglobal space lines * 307 733-1391 (Fax) http://www.interglobal.org
"Extraordinary launch vehicles require extraordinary markets..."
------------------------------
Date: 26 Feb 1997 10:00:59 -0800
From: Russ Allbery <rra@cs.stanford.edu>
To: dico@isn.net (Dico Reyers)
Subject: Re: Formatting numbers
Message-Id: <qum20a3xx9g.fsf@cyclone.stanford.edu>
[ Posted and mailed. ]
Dico Reyers <dico@isn.net> writes:
> Say that: $number = 1.345; I would like that number rounded off to two
> decimal spots. So number would be 1.35 .
$number = sprintf ("%.2f", $number);
--
Russ Allbery (rra@cs.stanford.edu) <URL:http://www.eyrie.org/~eagle/>
------------------------------
Date: 26 Feb 1997 17:39:58 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Forms AHHHH...Help !!!
Message-Id: <5f1she$ncq@fridge-nf0.shore.net>
Mark R Arnold (mark@channelzero.demon.co.uk) wrote:
: This is rather sad, i need desperate help with creating html forms. I
: can create the front end (ie. the actual bit where the user types in
comp.lang.perl.misc doesn't deal with HTML/CGI issues, but here are
some great resources to try:
Try: comp.infosystems.www.authoring.cgi
Try: http://www.perl.com/CPAN/modules/by-module/CGI/CGI.pm-2.31.tar.gz
Get and install this module.
Try: http://www.dejanews.com and query for CGI parse form
--
Nathan V. Patwardhan
nvp@shore.net
"What is the wind speed of a sparrow?"
------------------------------
Date: Wed, 26 Feb 1997 13:51:07 -0500
From: fl_aggie@hotmail.com (I R A Aggie)
Subject: Re: futur de perl et java-script
Message-Id: <fl_aggie-ya02408000R2602971351070001@news.fsu.edu>
In article <5eqbmr$3p0$1@csnews.cs.colorado.edu>, tchrist@mox.perl.com (Tom
Christiansen) wrote:
+ Why do you think there exist perl groups like de.comp.lang.perl?
To discuss perl in German? if so, do they have:
use German;
???
James - :)
--
Consulting Minster for Consultants, DNRC
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: 26 Feb 1997 08:35:57 -0800
From: Russ Allbery <rra@cs.stanford.edu>
To: "Kuntal M. Daftary" <daftary@ecn.purdue.edu>
Subject: Re: help. perl Q. (fwd)
Message-Id: <qumrai3y176.fsf@cyclone.stanford.edu>
[ Posted and mailed. ]
Kuntal M Daftary <daftary@ecn.purdue.edu> writes:
> the wrapper is supposed to accept stuff from user via keyboard and pass
> it on to the program, then accept whatever the program outputs and
> display it on the screen for the user. thus it is a wrapper in true
> sense.
> now i had two problems implementing the thing in perl:
> 1. i did the usual thing of opening a pipe and forking a child process
> and exec-ing the program in the child. now, i dont know how to dup2 the
> stdin of the child to a particular file handle in perl. any ideas?
open (STDIN, "<&FILEHANDLE") or die "cannot dup FILEHANDLE: $!";
> 2. the program itself is weird.
> now whenever i start my wrapper, it does not display the line 1, but if
> i press 'q', it does display line 2 and normal interaction starts...
Make sure you've autoflushed all of those file handles, and be aware that
this may or may not work right depending on the buffering behavior of the
program you're wrappering. See the $| entry in the perlvar man page and
the entry for the one-argument form of select in the perlfunc man page.
--
Russ Allbery (rra@cs.stanford.edu) <URL:http://www.eyrie.org/~eagle/>
------------------------------
Date: Wed, 26 Feb 1997 11:05:04 -0600
From: Brett Denner <dennerbw@lmco.lmtas.com>
Subject: How to keep parent processing running until child exits?
Message-Id: <33146D40.41C6@lmco.lmtas.com>
I need to fork a child process to accomplish a task, and, in the
meantime, have the parent process execute a loop until the child process
is finished....
I know how to fork a child and have the parent wait until the child is
finished before the parent continues:
if ($pid = fork)
{
# parent process
}
elsif (defined $pid)
{
# child process
exit;
}
waitpid($pid, 0);
I want to do something like the following:
if ($pid = fork)
{
# parent process
TASK:
while (1)
{
# do some repetitive task while child runs
last TASK if &child_is_finished($pid);
}
}
elsif (defined $pid)
{
# child process
exit;
}
Is there a way to accomplish what the "&child_is_finish($pid)" function
does in the preceding example?
Thanks,
Brett
------------------------------------------------------------------------
Brett W. Denner Lockheed Martin TAS
Brett.W.Denner@lmtas.lmco.com P.O. Box
748
(817) 935-1142 (voice) Fort Worth, TX 76101
(817) 935-1212 (fax) MZ 9333
------------------------------
Date: Wed, 26 Feb 1997 12:06:45 -0500
From: airborne@cybernex.net (Angel Leyva)
Subject: HTML::
Message-Id: <332f6d1b.186343647@news.cybernex.net>
I have noticed may references to the HTML:: package?
Where can I get there files. I am doing some CGI and need to manipulate some
text for both display in HTML and saving to a database. I need to convert the
text to and from HTML. I suspect that this package has several routines that
will help me out.
THanx in advance
Angel Leyva
(airborne@www2.cybernex.net)
http://cybernex.net/~airborne
------------------------------
Date: 26 Feb 1997 17:48:29 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: HTML::
Message-Id: <5f1t1d$ncq@fridge-nf0.shore.net>
Angel Leyva (airborne@cybernex.net) wrote:
: Where can I get there files. I am doing some CGI and need to manipulate some
: text for both display in HTML and saving to a database. I need to convert the
Why not pick up the entire LWP (libwww) package while your at it? I
imagine that a number of your interests will be covered here - and the
package includes excellent documentation to whet the appetite.
http://www.perl.com/CPAN/modules/by-module/LWP/
The latest version seems to be 5.07.
--
Nathan V. Patwardhan
nvp@shore.net
"What is the wind speed of a sparrow?"
------------------------------
Date: 26 Feb 1997 17:49:16 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: HTML::
Message-Id: <5f1t2s$ncq@fridge-nf0.shore.net>
Nathan V. Patwardhan (nvp@shore.net) wrote:
: Angel Leyva (airborne@cybernex.net) wrote:
: Why not pick up the entire LWP (libwww) package while your at it? I
^^^^
I meant you're.
--
Nathan V. Patwardhan
nvp@shore.net
"What is the wind speed of a sparrow?"
------------------------------
Date: Wed, 26 Feb 1997 12:12:32 -0600
From: Eryq <eryq@enteract.com>
To: Angel Leyva <airborne@cybernex.net>
Subject: Re: HTML::
Message-Id: <33147D10.9876C35@enteract.com>
Angel Leyva wrote:
>
> I have noticed may references to the HTML:: package?
>
> Where can I get there files. I am doing some CGI and need to manipulate some
> text for both display in HTML and saving to a database. I need to convert the
> text to and from HTML. I suspect that this package has several routines that
> will help me out.
Try www.perl.com/CPAN. I can only tell you abouit HTML::Stream, in my
CPAN directory (authors/Eryq); not sure where the others are.
--
___ _ _ _ _ ___ _ Eryq (eryq@enteract.com)
/ _ \| '_| | | |/ _ ' / Hughes STX, NASA/Goddard Space Flight Cntr.
| __/| | | |_| | |_| | http://www.enteract.com/~eryq
\___||_| \__, |\__, |__
|___/ |___/ UNIX-FM: more talk ; less yacc yacc yacc
------------------------------
Date: Wed, 26 Feb 97 19:26:55 GMT
From: Daniel.Fournier@courrier.usherb.ca (Daniel Fournier)
Subject: Is numeric or alphabetic???
Message-Id: <5f22d6$cv6$1@news.si.usherb.ca>
Hello folks,
(sorry this might belong in comp.lang.perl but it is not yet added
to our news server...)
Is there any way to test if the value of a variable is purely numeric,
alphabetic, or alphanumeric? How is it done for each?
Before testing if the value of a variable is greater than 100 I want to be
sure it contains only digits (integer number) so that the if comparison
statement will not be invalid.
Please respond directly. Thanks.
Daniel.Fournier@courrier.usherb.ca
------------------------------
Date: Wed, 26 Feb 97 17:47:51 GMT
From: links@m2c.com
Subject: Links Related To comp.lang.perl.misc - FREE ACCESS 0226
Message-Id: <5f1spl$hk4@nicaragua.earthlink.net>
For Free Access To Links Related To comp.lang.perl.misc Set Your Web Browser
To:
http://www.m2c.com/links/compute.htm
Courtesy Of Surfing Links By M2C
-----------------------------
Sponsored by Robo Surfer - Your Own Personal Internet Robot
Download Your Free Demo Today!
http://www.robosurfer.com
------------------------------
Date: Wed, 26 Feb 1997 08:48:55 -0600
From: Jerry Monsen <jerrym@ibmoto.com>
To: JALOTTA <jalotta@aol.com>
Subject: Re: macperl help (2nd post)
Message-Id: <33144D57.59E2@ibmoto.com>
JALOTTA wrote:
> how can I run macperl with a command line interface using the mpw shell?
Can't help there...
>
> after creating a droplet, where do I look for the dropped file? I look in
> $ARGV[0] but it's not there.
Hmm. That's where I find it.. If I drop a selection of multiple
files on the droplet, @ARGV contains the list in the order I selected
them.
>
> why didn't this post the first time?
>
Not much help there either.
Jerry
------------------------------
Date: Wed, 26 Feb 1997 15:45:42 GMT
From: (Phil Hanna)
Subject: MS Access database access from Perl for Win32
Message-Id: <33155a4c.178701046@newshost.unx.sas.com>
How can I access a MS Access database (.mdb) from a Perl for Win32
program?
Thanks.
Phil Hanna (saspeh at unx dot sas dot com)
Econometrics and Time Series R&D
SAS Institute, Inc.
------------------------------
Date: Wed, 26 Feb 1997 14:30:33 GMT
From: fdc@cliwe.ping.de (Frank D. Cringle)
Subject: Re: mSQL calls from Perl
Message-Id: <vt4tezvdva.fsf@cliwe.ping.de>
"Timothy B. Rutherford" <timr@zimmers.com> writes:
>Hopefully someone can help me. I need to make SQL calls from Perl. I
> [ ... ]
>use Msql;
Evidently you have access to MsqlPerl. It comes with documentation.
Type "perldoc Msql" at your shell prompt. Also, read the pmsql script
- it is an extensive example of using mSQL from Perl. "which pmsql"
will tell you where it is.
--
Frank Cringle, fdc@cliwe.ping.de
voice: (+49 2304) 467101; fax: 943357
------------------------------
Date: 26 Feb 1997 20:07:09 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Multi-line processing
Message-Id: <5f255d$5rd@news-central.tiac.net>
In article <5f0vgk$reb@omega.gmd.de>, Georg Wittig <wittig@omega.gmd.de> wrote:
> printf ("/* abc %s\n", mystring); /* some comment */
>will be translated to
> printf ("
This gets quite interesting if you want to look into it further then
Jeffrey Friedl's book develops a regex which matches C /* */ style
comments and C++ // to end of line comments taking into account strings
and optimizes it. Interesting reading - Mastering Regular Expressions (aka
the hip owls book.)
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@psa.pencom.com | Pencom Systems Administration (work)
------------------------------
Date: Wed, 26 Feb 1997 13:17:08 -0500
From: ted wang <ted.wang@bowne.com>
Subject: new win32::ODBC("DSN")
Message-Id: <33147E24.5675@bowne.com>
I just downloaded the win32::ODBC module from
http://www.roth.net/odbc/odbcfaq.htm
and installed it according to the instruction.
However I cann't get it work. (I have 32 bit version of ODBC 3.0
installed).
In my test.pl, I only have two lines:
use Win32::ODBC;
$db= new Win32::ODBC("DSN=t:miswd001:wnt1;UID=ted;PWD=wang;") ;
The $db always return null.
I'm not sure if the DSN is correct or not.
DSN='t:miswd001:wnt1' , where t:miswd01:wnt1 is the host string
when i use sqlplus to access database.
What is the DSN supposed to look like ?
Any help is appreciated . (email response preferred)
--Ted Wang
------------------------------
Date: 26 Feb 1997 16:49:44 GMT
From: "jfreed" <jfreed@sigma6.com>
Subject: newbie question:manipulating strings
Message-Id: <01bc2404$fc284d20$fb30b0cc@crazytrain.sigma6.com>
having some problems getting up to speed with perl syntax,
be great if someone could help me out.
I want to take a very long one line string and break it up into lines of
20 characters each.
I've been able to do it using a very long and complicated looping process,
but I'm sure
there is a more efficient way.
any input would be appreciated.
thanks
-jon
------------------------------
Date: 26 Feb 1997 18:07:20 GMT
From: mfiresto@vnet.ibm.com (Mik Firestone)
Subject: Re: newbie question:manipulating strings
Message-Id: <5f1u4o$k4e$1@mail.lexington.ibm.com>
In article <01bc2404$fc284d20$fb30b0cc@crazytrain.sigma6.com>,
jfreed <jfreed@sigma6.com> wrote:
>having some problems getting up to speed with perl syntax,
>be great if someone could help me out.
>
>I want to take a very long one line string and break it up into lines of
>20 characters each.
>I've been able to do it using a very long and complicated looping process,
>but I'm sure
>there is a more efficient way.
>
>any input would be appreciated.
>
>thanks
>-jon
>
Try something like this:
#!/usr/local/bin/perl -w
$string = "This is a really long string with lots of characters and more ".
"noise than I now what to do with.";
@parts = ( $string =~ /.{1,20}/g );
# If you want to split on spaces ( white spaces... ), use
# /.{1,20}\s/g
$"="\n";
print "@parts\n";
As I learned here not too long ago, if a m//g is evaluated in a list
context, it will return all the matches. Which I think is really cool.
-----
Mik Firestone mfiresto@mindspring.com
Evil Overlord Rule #36: My pet monster will be kept in a secure cage
from which it cannot escape and into which I could not accidentally
stumble.
------------------------------
Date: Wed, 26 Feb 1997 13:04:41 -0500
From: ted wang <ted.wang@bowne.com>
To: mshannon@lds.com
Subject: Re: Oracle DB Access from PERL 5!!
Message-Id: <33147B39.37AB@bowne.com>
Michael Shannon wrote:
>
> Hi,
>
> I was wondering if anyone knew anything about accessing an Oracle
> database stored procedures from Perl. I know there existed an Oraperl
> for Perl4.0, but apprently this was not updated for Perl 5.
>
> Thanks for your help...mjs
> --
> Michael J. Shannon, Jr.
> mshannon@lds.com Logical Design Solutions, Inc.
> 201-971-0100 ext 161 465 South Street Suite 103
> 201-971-0103 (fax) Morristown, NJ 07960
With win32 perl5.001, there comes a win32::ODBC libararty , which is an
extension to perl5.001 and provide access to ODBC API. You need a win 32
bit ODBC driver off cource.
see:
http://www.roth.net/odbc/odbcfaq.htm
I downloaded this win32::ODBC and played with it. So far, I haven't got
it work yet.
I 'm not really clear what's the problem. Probaply I misused the Data
source Name (DSN) , which is required parameter to connect to the
database.
Give a try and if you have any luck, let me know.
--Ted wang
------------------------------
Date: 26 Feb 1997 09:11:54 -0700
From: kannawin@q.osmre.gov (Bill Kannawin)
To: mshannon@lds.com
Subject: Re: Oracle DB Access from PERL 5!!
Message-Id: <5f1nca$imj@q.osmre.gov>
check out DBD-Oracle and DBI combo, it should do what you want.
In article <3313741E.799B@lds.com>, Michael Shannon <mshannon@lds.com> writes:
|> Hi,
|>
|> I was wondering if anyone knew anything about accessing an Oracle
|> database stored procedures from Perl. I know there existed an Oraperl
|> for Perl4.0, but apprently this was not updated for Perl 5.
|>
|> Thanks for your help...mjs
|> --
|> Michael J. Shannon, Jr.
|> mshannon@lds.com Logical Design Solutions, Inc.
|> 201-971-0100 ext 161 465 South Street Suite 103
|> 201-971-0103 (fax) Morristown, NJ 07960
--
Bill Kannawin (303)844-1479 kannawin@osmre.gov|
Technical Information Processing System |
US Office of Surface Mining; 1999 Broadway, |
Suite 3320, Denver, Colorado 80202 |
------------------------------
Date: Wed, 26 Feb 1997 18:04:40 GMT
From: danr@hpwadjn.wal.hp.com (Daniel Rasmussen)
Subject: Problems reading file using <> operator
Message-Id: <DANR.97Feb26130441@hpwadjn.wal.hp.com>
Hi,
I have a perl module that reads from a file using the <> operator.
The exact code is as follows:
open(PFILE, $pFile);
while (<PFILE>)
{
if (/coc/)
{
($par, $cocInd) = /(\".*\")(.*)\)/;
}
}
close(PFILE);
This code works as expected when called from my test app but I have
problems when its used by the app it was designed for. Specifically,
it is reading more than one line at a time when used by the other
app. It behaves more like read() in that it seems to be reading a
specific number of byes rather than a line at a time.
Is the <> operator somehow being toggled into a different mode?
I can't find anything in my camel book about it.
Any ideas?
Perl version is 5.0.2. Please follow up to the news group or to both
danr@an.hp.com and dras@sw.stratus.com.
Thanks.
Dan Rasmussen
danr@an.hp.com
dras@sw.stratus.com
------------------------------
Date: 26 Feb 1997 14:26:26 -0500
From: awdorrin@ictest.delcoelect.com (Albert W. Dorrington)
Subject: Problems seeing files thru links/NSF?
Message-Id: <5f22p2$9sl@ws051eng.ictest.delcoelect.com>
Hi all,
I've written a program that generates a list of filenames
and then is supposed to copy those files over to another directory.
However, The files are not seen by my perl process.
A code segment is:
foreach $fname (@list)
{
$dir = &finddir($stdfname);
print "$dir/$stdfname";
if ( -r "$dir/$stdfname" )
{ print "File readable\n"; }
else
{ print "File not readable\n"; }
$ret=copy("$dir/$stdfname", "/users/awdorrin/$fia.tmpdir.$PID/$stdfname");
print "$ret - $!\n";
}
When I run this routine, I keep getting a print out of the
filename followed by
'File not readable'
and then
'0 - No such file or directory'
The 'copy' function is being used from the 'use File::Copy' directive.
I only added the if ( -r ) test after the copying did not work.
Am I missing something obvious here, or does Perl have problems
either 1) following links or 2) reading nfs mounts?
Thanks in advance.
- Al
--
Al Dorrington awdorrin@ictest.delcoelect.com
Delco Electronics - IC CIM Database & Unix Administrator
Kokomo, Indiana, USA Phone: 765.451.9655
------------------------------
Date: 26 Feb 1997 14:58:29 -0500
From: awdorrin@ictest.delcoelect.com (Albert W. Dorrington)
Subject: Re: Problems seeing files thru links/NSF?
Message-Id: <5f24l5$9ul@ws051eng.ictest.delcoelect.com>
Ack, it figures 5 minutes after I post the question I figure out
what I'm doing wrong.
I had a newline on the end of my filename, so Perl was tring to look
for '/dir/path/filename\n' instead of just '/dir/path/filename'
Can't beleive I forgot that. *blush*
sorry for the wasted post!
- Al
In article <5f22p2$9sl@ws051eng.ictest.delcoelect.com>, awdorrin@ictest.delcoelect.com (Albert W. Dorrington) writes:
:>
:> Hi all,
:>
:> I've written a program that generates a list of filenames
:> and then is supposed to copy those files over to another directory.
:> However, The files are not seen by my perl process.
:>
:> A code segment is:
:>
<snip>
:>
:>
:> When I run this routine, I keep getting a print out of the
:> filename followed by
:> 'File not readable'
:> and then
:> '0 - No such file or directory'
:>
:> The 'copy' function is being used from the 'use File::Copy' directive.
:> I only added the if ( -r ) test after the copying did not work.
:>
:> Am I missing something obvious here, or does Perl have problems
:> either 1) following links or 2) reading nfs mounts?
:>
:> Thanks in advance.
--
Al Dorrington awdorrin@ictest.delcoelect.com
Delco Electronics - IC CIM Database & Unix Administrator
Kokomo, Indiana, USA Phone: 765.451.9655
------------------------------
Date: 26 Feb 1997 18:51:15 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Question on "eval"
Message-Id: <5f20n3$319@lyra.csx.cam.ac.uk>
David Salisbury <salisbur@venus.fsl.noaa.gov> wrote:
>
>eval "\$anArray{$sortorder} = \$sometext"; ##<--- why no work??
Always check $@ after an eval, otherwise any errors will be quietly
ignored. In this case, the string passed to eval is
"$anArray{$date$type} = $dometext"
^^
and there is a syntax error where indicated. It would have shown up in $@.
Mike Guy
------------------------------
Date: 26 Feb 1997 17:30:48 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: replaceing stuff
Message-Id: <5f1s08$sb5$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
vetler@ifi.uio.no (Vetle Roeim) writes:
:i'm trying to write a script that extratcs links from html-documents.
:the only problem i have, is that i don't know how i should
:delete everything exept the link from a variable.
:ex: a line says; <A HREF="http://www.perl.org">Perl</A>, and i want it to
:say "http://www.perl.org".
See http://www.perl.com/perl/scripts/html-hacking.html
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
In English, every word can be verbed. Would that it were so in our
programming languages.
------------------------------
Date: 26 Feb 1997 19:12:14 GMT
From: dalonso@u.washington.edu (Darwin O.V. Alonso)
Subject: shuffle an array
Message-Id: <5f21ue$7ck@nntp1.u.washington.edu>
Is there a perl function that returns a shuffled array.
e.g: @shuffledarray = shuffle(@old);
I tried "values" and "keys" for associative arrays, but those
don't actually return random values.
Thanks,
Darwin dalonso@u.washington.edu
------------------------------
Date: Wed, 26 Feb 1997 19:10:16 GMT
From: Neal Nachtigall <nealnach@dlgef.cr.usgs.gov>
To: Paco Hope <bah6f@cs.virginia.edu>
Subject: Re: Standalone environment
Message-Id: <33148A98.5815@dlgef.cr.usgs.gov>
Paco Hope wrote:
> How do I do this? How do I tell the program to look in a particular
> directory for its modules? Equally important: how do I tell it NOT to
> look in the standard places for modules? (the paths to them are
> different on the fileserver)
Not for sure, but I think that you can do what you want using one, some,
or all of the following environment variables similar to the way shown:
setenv PATH
/first/place/to/look/for/script:/second/place/to/look/for/script:/first/place/to/look/for/perl_binary:/second/place/to/look/for/perl_binary
setenv PERL5LIB
/first/place/to/look/for/modules/for/script:/second/place/to/look/for/modules/for/script
setenv LD_LIBRARY_PATH
/first/place/to/look/for/perl_library:/second/place/to/look/for/perl_library
Good luck,
--
Neal L. Nachtigall * nealnach@dlgef.cr.usgs.gov
Hughes STX (EROS Data Center)
No wonder nobody comes here--it's too crowded. -Yogi Berra
------------------------------
Date: 26 Feb 1997 18:44:39 GMT
From: George Briechle <73414.1161@CompuServe.COM>
Subject: system() command problem
Message-Id: <5f20an$jkv$1@mhadf.production.compuserve.com>
Please help me with the below file!
$dir = "d:/mydir/temp";
opendir (DIRMANE, $dir) || die("...");
while ( $source = readdir(DIRNAME))
{
next if (!($sourcr=~ /imp/);
$cnvrtfil = "c".$source;
print("$cnvrtfil\n");
$prognam = "d:/mydir/temp/dmcvrt.exe";
# exec $prognam, $source, $cnvrtfil;
# this gives me the error " cannot create the swap file ...";
system ($prognam, $source,$cnvrtfil);
# this has no errors but no output (just the print statement: ;
system(dmcver, $source, cvrtfil);
}
It looks like the system command is being executed because I
get 2 print statements from the loop.
Please respond to E-Mail address:
mhox@ershq.ccmail.compuserve.com thank you.
------------------------------
Date: 26 Feb 1997 20:14:54 GMT
From: mike@stok.co.uk (Mike Stok)
Subject: Re: Tap, tap, anyone here ?
Message-Id: <5f25ju$6cj@news-central.tiac.net>
In article <01bc23dc$d92b4480$36d880c1@aardvark.3dlabs.com>,
Doug Bridgens <doug@3dlabs.com> wrote:
>Hi,
> I'm brand new to perl, just picked up the Llama book yesterday! I need
>to write CGI apps for our intranet (3Dlabs Inc.), unforunately running on
>NT :( The book (Llama book) suggests this news group as a source of
>info/help. I was just looking to see what discussions were currently
>going on, and this place seems empty ? Or do I have to wait for a while
>before our news feed delivers the news, I just added this group to our
>list.
You may have to wait a bit for news so I'll Cc: it in mail as well.) If
you have www access then
http://www.endcontsw.com/people/evangelo/Perl_for_Win32_FAQ.html
will be of direct use to you, and http://www.perl.com/perl/ is a good
starting point for exploration. If you don't have access to the web I'll
happily mail you a copy.
Hope this helps,
Mike
--
mike@stok.co.uk | The "`Stok' disclaimers" apply.
http://www.stok.co.uk/~mike/ | PGP fingerprint FE 56 4D 7D 42 1A 4A 9C
http://www.tiac.net/users/stok/ | 65 F3 3F 1D 27 22 B7 41
stok@psa.pencom.com | Pencom Systems Administration (work)
------------------------------
Date: 26 Feb 1997 09:53:02 -0800
From: Russ Allbery <rra@cs.stanford.edu>
Subject: Re: The fabulous pink camel (or red, if you prefer that), a review.
Message-Id: <qum4tezxxmp.fsf@cyclone.stanford.edu>
Tom Grydeland <tom@palver.nospam.eiscat.no> writes:
> The eval trick used in the grep-like programs in chapter 6 to avoid
> recompiling patterns on each pass; has it been made obsolete by the /o
> regexp modifier?
No, not if you want to be able to search for multiple patterns over the
course of the program. Once the /o regex has been compiled, you can't
ever change the pattern no matter what, so each execution of that section
of code will use the original pattern. In a lot of cases, that's not what
you want and the eval trick is better.
--
Russ Allbery (rra@cs.stanford.edu) <URL:http://www.eyrie.org/~eagle/>
------------------------------
Date: 26 Feb 1997 10:02:39 -0800
From: Russ Allbery <rra@cs.stanford.edu>
To: "Robert A. Goff" <ragoff@sandia.gov>
Subject: Re: Using a variable for mode in chmod and mkdir
Message-Id: <qumwwrvwim8.fsf@cyclone.stanford.edu>
[ Posted and mailed. ]
Robert A Goff <ragoff@sandia.gov> writes:
> I need help using a variable for the mode parameter in chmod and mkdir,
> Using the literal octal numbers gets me the right mode, so I obviously
> don't know how to cast a variable to an octal value.
>From man perlfunc:
oct EXPR
Interprets EXPR as an octal string and returns the
corresponding decimal value. (If EXPR happens to
start off with 0x, interprets it as a hex string
instead.) The following will handle decimal, octal,
and hex in the standard Perl or C notation:
$val = oct($val) if $val =~ /^0/;
If EXPR is omitted, uses $_.
So just pass oct ($dirmode) into chmod and it will work correctly.
--
Russ Allbery (rra@cs.stanford.edu) <URL:http://www.eyrie.org/~eagle/>
------------------------------
Date: 26 Feb 1997 18:15:04 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Using a variable for mode in chmod and mkdir
Message-Id: <5f1uj8$1pl@lyra.csx.cam.ac.uk>
Jim Anderson <jander@ml.com> wrote:
>
>Blue Camel, p. 40
>
>$dirmode = '\0777';
>$filemode = '\0755';
No - that would give you a 5 character string, not an octal number.
Try instead
$dirmode = 0777;
etc.
Mike Guy
------------------------------
Date: 26 Feb 1997 09:01:10 -0800
From: Russ Allbery <rra@cs.stanford.edu>
To: Bertrand Le Guen <b.leguen@ctr.renault.fr>
Subject: Re: Which one is the best (pattern matching)
Message-Id: <qumiv3fy015.fsf@cyclone.stanford.edu>
[ Posted and mailed. ]
Bertrand Le Guen <b.leguen@ctr.renault.fr> writes:
> to do a pattern matching in a string i use
> if ($page !~ m/\.html/g) { }
> if (index($page,".html") == -1) { }
> which one is the faster or best way to do this ??
Well, first of all, you don't need the /g modifier. After all, you're
just checking one match.
Let Perl check for you. Run the script:
use Benchmark;
$test = 'filename.htm';
timethese (1000000, {
'regex' => '$test !~ /\.html/',
'index' => 'index ($test, ".html") == -1'
});
$test = 'filename.html';
timethese (1000000, {
'regex' => '$test !~ /\.html/',
'index' => 'index ($test, ".html") == -1'
});
I get:
Benchmark: timing 1000000 iterations of index, regex...
index: 5 secs ( 3.31 usr 0.00 sys = 3.31 cpu)
regex: 3 secs ( 2.50 usr 0.01 sys = 2.51 cpu)
Benchmark: timing 1000000 iterations of index, regex...
index: 3 secs ( 3.54 usr 0.00 sys = 3.54 cpu)
regex: 9 secs ( 8.26 usr 0.00 sys = 8.26 cpu)
Which means that regex is faster for an unsuccessful match, at least with
that string, and far slower with a successful match, while index is
consistent. Interestingly enough, anchoring the regular expression
doesn't appear to help any in this case.
Unfortunately, these results are rather dubious, due to problems with the
Benchmark module with regular expressions. How much that would affect the
results, I'm not sure; the overall effect should be that regexes are
faster than this would make them appear.
--
Russ Allbery (rra@cs.stanford.edu) <URL:http://www.eyrie.org/~eagle/>
------------------------------
Date: 8 Jan 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Jan 97)
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.
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.
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 18
************************************
