[6818] in Perl-Users-Digest
Perl-Users Digest, Issue: 443 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed May 7 04:07:15 1997
Date: Wed, 7 May 97 01:00:33 -0700
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, 7 May 1997 Volume: 8 Number: 443
Today's topics:
Re: @INC Modification <billc@tibinc.com>
Re: checking IP's & MAC of 40,000 hosts <c.evans@clear.net.nz>
clever coding required <alex99@ozemail.com.au>
Re: clever coding required <friedman@uci.edu>
Re: clever coding required (Daniel S. Lewart)
Re: clever coding required <ajohnson@gpu.srv.ualberta.ca>
Re: closed filehandle error (Tad McClellan)
Re: Definition of $<digit> in perlvar.pod (Tad McClellan)
Finding a pattern in a file Query???
Re: How to fit a Perl5 program to Perl4? (brian d foy)
Re: I'm curious... What the "o" switch is for in s/// (Tad McClellan)
In-line editing help? <quemast@bvsd.k12.co.us>
informix and perl (Lpage)
Jack Shirazi <gbarr@ti.com>
Re: Modules/Packages in Perl <stephen+usenet@farrell.org>
Re: Moving a file (Nathan V. Patwardhan)
Perl 5.003 .PDF Manual (Gary K. Nitzberg)
Re: Perl, Cookies, Location (Geoffrey Hebert)
Re: Please Help a Newbie (Geoffrey Hebert)
Re: program for perl? (Andrew M. Langmead)
Re: program for perl? (Craig Berry)
Proxy methods versus class methods (Colin Kuskie)
rdist'ing /usr/local/lib/perl5/ ??? (Philip Hallstrom)
REGEXP HELP, PLEASE! <samson@otterspace.com>
Re: REQ: Script to send mail to LIST of persons (Geoffrey Hebert)
Re: Script runs fine from shell, but browser doesn't re (Clay Irving)
World Renowned Perl Author Randal Schwartz Teaching Ope <s..vanechanos@postoffice.worldnet.att.net>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 06 May 1997 21:53:33 -0400
From: Bill Cowan <billc@tibinc.com>
To: Terry Robison <trobison@erols.com>
Subject: Re: @INC Modification
Message-Id: <336FE09D.7EA5@tibinc.com>
Terry Robison wrote:
>
> Does anyone know how to initialize @INC to point to a specific
> directory?
use lib "<lib_directory>"; # adds another directory to @INC.
> A little backround:
>
> I have a system standard version of perl installed on my server (Version
> 5.001). I have acquired a CGI script that requires 5.002. The system
> folks have installed V. 5.003 in another directory on the server. I have
> changed the first line of the scripts to reflect the newer version path.
> But I am still getting an error not locating the Oraperl module that is
^^^^^^^^^^^^^^
Be careful whether the 5.003 Perl is static or dynamic linking with this
module. If static linking with oraperl, then you need to rebuild the
Perl. If dynamic linking, your may still need to re-install this module
if adding path to @INC does not solve your problem.
> referenced in a "use" statement. When I print the @INC array it has a
> directory that is not located on our server, thus it is not finding the
> library routines. How can I assure that the scripts can locate the perl
> library?
-- Bill
-----------------------------------------------------------------------
Bill Cowan <billc@tibinc.com> Voice:919-490-0034 Fax:919-490-0143
Tiburon, Inc./3333 Durham-Chapel Hill Blvd Suite E-100/Durham, NC 27707
------------------------------
Date: 06 May 1997 19:33:37 +1200
From: Carey Evans <c.evans@clear.net.nz>
Subject: Re: checking IP's & MAC of 40,000 hosts
Message-Id: <87bu6pxdf2.fsf@psyche.evansnet>
Diana March <diana.march@spamfree.fmr.com> writes:
[snip]
> 1. Does anyone have a script for fast pinging a ton of machines?
There's a program on my Linux box here called `fping' which pings
multiple hosts from the command line or a file. I probably have the
source somewhere. You could also use Net::Ping 2 from CPAN to write
one yourself.
> 2. How useful have you found this script to be?
I haven't needed to do this myself.
> 3. I will also need to get the MAC address does anyone have any
> suggestions as to where I should start?
If all the machines are on the same subnet as your workstation, check
its arp table after you've pung the host (`arp -a`).
You could also run `tcpdump -ne' for a while ( few days ?) and extract
all the IP and MAC addresses it prints out. This should get any
machine on the local network that's active, and any other machine's IP
address that's talking to a machine on your local network. You
definitely want to process this with Perl as the packets come in, not
save it all and analyse it later.
--
Carey Evans <*> c.evans@clear.net.nz
"Encryption renamed to Encode to avoid US regulation problems"
- include/linux/wireless.h in Linux 2.0.30 kernel
------------------------------
Date: 6 May 1997 13:23:48 GMT
From: "alex" <alex99@ozemail.com.au>
Subject: clever coding required
Message-Id: <01bc5a20$bd8e3c80$a7078496@toshi>
Hi everyone,
I've spend hours upon hours trying to cleverly deal with data of the form
a field | some more stuff | another field | field4 | hello mum
(dumped from a rdbms)
Field are separated by the pipe char | Each field may have trailing and
leading whitespace. I need to "split" the fields
($aField, $another, $foo)=split(/\|/), but then I have to trim each field
$aField =~ remove leading spaces
$aField =~ remove trailing spaces
FOR each field ..... blah blah blah *too many lines*
If the leading and trailing whitespace can be consumed before the split,
the split would be nicer, each field would be ready to go.
I know (deep down in my bones) that there is a more eligant solution, but
I don't find it ... grrrrh!!!
I naively thought I coulde do a s/xxx/yyy/g type sub *followed* by the
split, hence get the job done on 2 lines. But the "s///" is to hard to
work out
Could anyone thing of a better way. Thanks in advance
alex
------------------------------
Date: 7 May 1997 04:38:42 GMT
From: "Eric D. Friedman" <friedman@uci.edu>
Subject: Re: clever coding required
Message-Id: <5kp10i$aut@news.service.uci.edu>
[mailed, posted]
In article <01bc5a20$bd8e3c80$a7078496@toshi>,
alex <alex99@ozemail.com.au> wrote:
>I've spend hours upon hours trying to cleverly deal with data of the form
>a field | some more stuff | another field | field4 | hello mum
>(dumped from a rdbms)
>
>Field are separated by the pipe char | Each field may have trailing and
>leading whitespace. I need to "split" the fields
>($aField, $another, $foo)=split(/\|/), but then I have to trim each field
>$aField =~ remove leading spaces
>$aField =~ remove trailing spaces
If you had looked at man perlre, you'd know that \s* will match zero
or more white spaces in a regular expression. Since split() splits
a string on a regular expression, there's no need to do a substitution
before splitting; you can do both in one pass.
my @fields = split /\s*\|\s*/, $line;
If you're sure that there'll be whitespace in every case, this would
be more efficient as
split /\s+\|\s+/, $line
Besides spending some time with the perlre manpage, I'd advise you to
pick up Friedl's book on regular expressions.
Best,
Eric
--
Eric D. Friedman
friedman@uci.edu
------------------------------
Date: 7 May 1997 05:01:40 GMT
From: d-lewart@uiuc.edu (Daniel S. Lewart)
To: alex99@ozemail.com.au (alex)
Subject: Re: clever coding required
Message-Id: <5kp2bk$lu1@vixen.cso.uiuc.edu>
"alex" <alex99@ozemail.com.au> writes:
> I've spend hours upon hours trying to cleverly deal with data of the form
> a field | some more stuff | another field | field4 | hello mum
> (dumped from a rdbms)
> ...
> Could anyone thing of a better way? Thanks in advance
Of course:
@F = split(/\s*\|\s*/);
Daniel Lewart
d-lewart@uiuc.edu
------------------------------
Date: Wed, 07 May 1997 01:10:05 -0500
From: Andrew Johnson <ajohnson@gpu.srv.ualberta.ca>
Subject: Re: clever coding required
Message-Id: <33701CBD.71323816@gpu.srv.ualberta.ca>
alex wrote:
>
> Hi everyone,
>
> I've spend hours upon hours trying to cleverly deal with data of the form
> a field | some more stuff | another field | field4 | hello mum
> (dumped from a rdbms)
>
> Field are separated by the pipe char | Each field may have trailing and
> leading whitespace. I need to "split" the fields
> ($aField, $another, $foo)=split(/\|/), but then I have to trim each field
> $aField =~ remove leading spaces
> $aField =~ remove trailing spaces
> FOR each field ..... blah blah blah *too many lines*
>
> If the leading and trailing whitespace can be consumed before the split,
> the split would be nicer, each field would be ready to go.
depending on the nature of your fields
you could strip out your leading/trailing spaces
from each field with something like:
$_=" a field | another field | and again ";
s/(?:^\s*|(\w)\s*(?=\|)|(\|)\s*|\s*$)/$+/g;
($field1,$field2,$field3)=split /\|/;
print "$field1:$field2:$field3";
and adjust to taste.
regards
andrew
------------------------------
Date: Tue, 6 May 1997 12:06:44 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: closed filehandle error
Message-Id: <4fonk5.tm1.ln@localhost>
Undergraduate labs (nobody@sys.uea.ac.uk) wrote:
: What could possibly be wrong with this program? I get the error
: print on closed file handle main::FILE
: #! /usr/local/bin/perl
: open(FILE, "</fozz/home1/ug/cmp/u9437517/www/cgi-bin/test.pab");
^^^^
What if this call did not succeed?
You're not checking the return to see if it did...
What if test.pab does not exist?
What if you do not have read access.
What if you made a typo anywhere along the path?
open(FILE, "</fozz/home1/ug/cmp/u9437517/www/cgi-bin/test.pab") ||
die "could not open file $!";
: print FILE "Hello\n";
: close(FILE);
: I am trying to write some perl to handle some routines in my web site
: but I can't get anything to write to a file. So I thought I'd go back
^^^^^^^^^^^^^^^
Permissions problem, likely.
: to basics as above, even this doesnt work.
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Tue, 6 May 1997 12:14:01 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Definition of $<digit> in perlvar.pod
Message-Id: <psonk5.ao1.ln@localhost>
David Alan Black (dblack@icarus.shu.edu) wrote:
: Hello -
: [ The following is subject to regex master correction and intervention. ]
: allen@gateway.grumman.com (John L. Allen) writes:
: >I've been trying to understand something that a fine perl-porter has
: >been trying to learn me, and so far I just can't get it. What should
: >the outputs of
: >
: > 1. perl -e '$_="abcd"; /(?:(b)|(c))*/; print "$1:$2:$3:$4\n"'
: > 2. perl -e '$_="abcd"; /((b)|(c))*/; print "$1:$2:$3:$4\n"'
: >
: >be, and how does their behaviour relate to this paragraph in perlvar.pod
: The output should be ':::', in both cases.
: In both cases (though in somewhat different ways with respect to $1-4),
: the search is for zero-or-more of (either 'b' or 'c'). In both cases,
: the match succeeds at the beginning of the string (the zero case), and
: never reaches the 'b' or the 'c'. Therefore, the match succeeds, but
: the $1-4 variables are empty. Hence :::.
[ snip ]
: I don't mean to jump down your throat, John, but why is it that *so many*
: regex questions make claims of having found a bug? This is, for very many
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
And a large percentage of those have to do with matching the null string.
As does the pattern under discussion.
The first troubleshooting step I take when my regex isn't doing what I
want, is to carefully consider matching null strings...
: people, the most intricate and difficult part of Perl to master, and yet,
: strangely, the area where the most supposed bugs are announced.... The
: regex part of the language is also depended upon heavily by a huge
: number of programs. This doesn't mean it can't have bugs, but - playing
: the percentages - it's pretty unlikely that something like the $<digit>
: mechanism doesn't work.
[ snip ]
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: 7 May 1997 07:29:34 GMT
From: Query???
Subject: Finding a pattern in a file
Message-Id: <5kpb0u$lnt@triton.np.ac.sg>
Hi,
Would appreciate any pointers to the following problem:-
I would like to find if a pattern exist in a certain file.
If it does output the finding into another file.
Both input and output file name is in a variable.
e.ga:-
$infile="/tmp/abc";
$outfile="/tmp/out";
grep $pat $infile > $outfile;
Thanks.
------------------------------
Date: Wed, 07 May 1997 01:11:23 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: How to fit a Perl5 program to Perl4?
Message-Id: <comdog-0705970111230001@nntp.netcruiser>
In article <5ko29v$7p4$1@nnrp1.crl.com>, Anirvan Chatterjee
<anirvan@crl.com> wrote:
> chomp individually chops every element of the list (@subscribers), and
> returns the total. Turning this into a function call should be easy.
no, chomp individually *chomps* each element of the list. it is
distinctly different from chop. consult perlfunc for the details :)
--
brian d foy <URL:http://computerdog.com>
unsolicited commercial email is not appreciated
------------------------------
Date: Tue, 6 May 1997 12:07:31 -0500
From: tadmc@flash.net (Tad McClellan)
Subject: Re: I'm curious... What the "o" switch is for in s///
Message-Id: <jgonk5.tm1.ln@localhost>
Clay Irving (clay@panix.com) wrote:
: In <jullk5.9q.ln@localhost> tadmc@flash.net (Tad McClellan) writes:
: >2)
: >@pat = ("abc", "def", "ghi");
: >foreach $pattern (@pat) {
: > print "matched\n" if /$pat/; # can't use 'o' here. If you do, then it
: print "matched\n" if /$pattern/; # Isn't this what you meant?
Duh. Oh yeah.
Sorry.
: > # will try and match 'abc' for *every*
: > # iteration of the loop
: >}
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Tue, 6 May 1997 21:28:55 -0600
From: GuideQueue Master <quemast@bvsd.k12.co.us>
Subject: In-line editing help?
Message-Id: <Pine.GSO.3.95.970506212209.27241A-100000@bvsd.k12.co.us>
Hi!
I'm just barley getting my feet wet w/ perl, and I've run into a
snag. I need to edit the passwd file and change a specific field. How
can I do this without appending a new entry or overwriting the existing
passwd file? Specifically I need to change the passwd field to a new
password (which is copied from yet another password field -- but I
already have that part ;-).
I've used PERL's in-line editing from the prompt using reg-exps.
How do I do this sort of thing from within a perl script?
Thanks in advance for any help! Please e-mail me (at least a copy) of
your reply. I do not have newsgroups available at my work (yet).
------------------------------
Date: Tue, 06 May 1997 23:06:09 -0700
From: "Frank S. (Lpage)" <frank@calweb.com>
Subject: informix and perl
Message-Id: <33701BD1.508@calweb.com>
has anyone accessed informix databases using perl?
i'd love to know how. thanks.
frank
--
------------------------------
Date: Wed, 07 May 1997 07:58:08 +0100
From: Graham Barr <gbarr@ti.com>
To: Perl5 Porters <perl5-porters@perl.org>
Subject: Jack Shirazi
Message-Id: <33702800.5248@ti.com>
Does anyone know if Jack is still around, both his Email address and web
site list on CPAN do not exist.
--
Graham Barr <gbarr@ti.com>
There is no ultimate answer.
Only more revealing ways of looking at the question.
------------------------------
Date: Wed, 7 May 1997 02:52:45 GMT
From: stephen farrell <stephen+usenet@farrell.org>
Subject: Re: Modules/Packages in Perl
Message-Id: <87wwpct2ma.fsf@phaedrus.uchicago.edu>
rjray@tremere.ecte.uswc.uswest.com (Randy J. Ray) writes:
> stephen farrell <stephen+usenet@farrell.org> writes:
> > I think what Neil wants to do (if I now understand him correctly) is
> > affect the load path with some variables, such as $HOME which he is
> > getting from a config file. It would seem likely that this effect
> > could be afforded by "use lib './foo'" type construct (if he really
> > meant $ENV{HOME}, then the relative link might be just the right
> > thing). One place to look might be at DynaLoader for this.
>
> If he needs to simply add a new directory to the search path, then the lib
> pragma is what he needs. I'm not sure what DynaLoader would be able to offer
> him, but the man page for lib.pm should answer most of the questions. If what
> he is trying to do is load subroutines on demand, then he may want to look at
> AutoLoader.pm (or wait for TPJ #6, which will have an article on making use of
Oh -- I suggested DynaLoader b/c it allows one to load modules (not
subroutines) on demand. Yeah, I know it's usually used to link in
.so's, but from the description it looks like it might be able to do
what he wants to do as well -- load modules whose names aren't known
until run time. But maybe not -- I've never used it.
------------------------------
Date: 7 May 1997 00:58:33 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Moving a file
Message-Id: <5kok3p$cde@fridge-nf0.shore.net>
Jonas J. Schlein (schlein@umbc.edu) wrote:
: PERL doesn't seem to have a "move" or "copy" operator for files. The
: "Learning Perl" book does suggest that you may 'move' a file by using
: the rename command, however this does not appear to work across file
: systems. I guess I'd have to blame this on the way UNIX implements the
: underlying "rename" function.
You could use the File::Copy module and unlink the original. See the pod
documentation for this.
--
Nathan V. Patwardhan
nvp@shore.net
------------------------------
Date: 7 May 1997 03:50:20 GMT
From: gknitz@nitzspace.com (Gary K. Nitzberg)
Subject: Perl 5.003 .PDF Manual
Message-Id: <5kou5s$enj@sjx-ixn4.ix.netcom.com>
I'm trying to find a copy of the Perl 5.003 Manual in PDF format.
All I can find is the 5.004 Beta. Does anyone know where there
is a copy of the 5.003 manual in PDF format. TIA.
Gary.
gknitz@nitzspace.com
------------------------------
Date: Wed, 07 May 1997 01:58:02 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: Re: Perl, Cookies, Location
Message-Id: <5komgc$t51$1@news3.microserve.net>
edz@raw.net wrote:
>After my script sets cookies, I can't get it to throw "Location:
>http://www.your.com" to the browser... Any ideas?
Last three lines of one of my scripts that work.
print "Set-Cookie: $name=$p_data; expires=$newtime;\n";
print "Location:
http://www.microserve.net/~soccer/$p_subject.html\n\n";
exit;
>Thanks
>EdZ
------- signature ----------
Check out the Perl site!
http://www.microserve.net/~soccer/
use password perlmisc
Geat tool for Developers>
------------------------------
Date: Wed, 07 May 1997 02:43:10 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: Re: Please Help a Newbie
Message-Id: <5kop4v$q9$1@news3.microserve.net>
Jon Swoveland <jswovela@uvic.ca> wrote:
>I don't know if this makes any sense, but...
>I have a question about using Perl scripts to generate SGML/HTML files.
>At the company I work for, I am the HTML coder, and I have been told I
>need to code some HTML pages which will be used in conjunction with a
>Perl script which was written by someone else. Apparently the Perl
>script generates SGML/HTML tags and text and places these strings in
>pre-defined place-holders in an HTML file. So, my question is: does
>anybody know the syntax for writing the HTML file with these
>place-holders?
You know how to write HTML.
The perl code probably reads a file and places info into
some location. Example:
You code html for name and address. Where there is
to be a name you put NNNNNNNNN.
Where there is to be the address you put AAAAAAA
Where there is to be city you put CCCCCCC
etc.
Perl programmer places your code on a file. He codes a program
to read your file and the data file and merge them and then write.
Get the Idea.
------- signature ----------
Check out the Perl site!
http://www.microserve.net/~soccer/
use password perlmisc
Geat tool for Developers>
------------------------------
Date: Wed, 7 May 1997 01:34:16 GMT
From: aml@world.std.com (Andrew M. Langmead)
Subject: Re: program for perl?
Message-Id: <E9sF14.Hnt@world.std.com>
junkmail@sysa.abdn.ac.uk (Kyzer) writes:
>Michael J Gebis, while smelling of fish, wrote:
>: Technically, that's the program needed to run perl. You can write in
>: perl using almost anything, from emacs to antelope blood on a cave wall.
>But the $64000 question is, if you write it in antelope blood on a cave wall,
>can you get perl to execute it afterwards? :)
You just need something that understands perl syntax.
You can start by reading the first perl statement off of the wall,
decide what a perl interpreter would do if it saw it. If you need some
scratch space to keep track of the current value of your variables,
you can write them on the opposing wall with more antelope's blood.
Its called a walkthrough.
--
Andrew Langmead
------------------------------
Date: 7 May 1997 07:06:02 GMT
From: cberry@cinenet.net (Craig Berry)
Subject: Re: program for perl?
Message-Id: <5kp9kq$2tm$1@marina.cinenet.net>
Michael J Gebis (gebis@purcell.ecn.purdue.edu) wrote:
: }Ah, yes, there IS a program needed to write in perl.
: }It's called "perl" :)
:
: Technically, that's the program needed to run perl. You can write in
: perl using almost anything, from emacs to antelope blood on a cave wall.
Wow, I thought I was the only one doing that! Do you find gazelle blood
works as well, or do you really need antelope? I'm experimenting with
ibexes (ibices?), too.
---------------------------------------------------------------------
| Craig Berry - cberry@cinenet.net
--*-- Home Page: http://www.cinenet.net/users/cberry/home.html
| Member of The HTML Writers Guild: http://www.hwg.org/
"Every man and every woman is a star."
------------------------------
Date: 6 May 1997 14:34:35 -0700
From: colink@latticesemi.com (Colin Kuskie)
Subject: Proxy methods versus class methods
Message-Id: <5ko85b$6f7@defiant.latticesemi.com>
Greetings, all!
I finished reading perltoot (v0.4, an older version) and started
designing an OO module to replace a module that I'd written, and
I got to thinking about advantages and disadvantages to proxy methods.
If I'm writing a simple proxy like Tom describes, I can see no
good reason to write out all the individual class methods. But
what if I wanted to write something a little more complex, like
the following:
##Building on tchrist's AUTOLOAD method
sub AUTOLOAD {
my $self = shift;
my $type = ref($self)
or croak "$self is not an object";
my $name = $AUTOLOAD;
$name =~ s/.*://; # strip fully-qualified portion
unless (exists $self->{_permitted}->{$name} ) {
croak "Can't access `$name' field in class $type";
}
##Implement special methods based on name
if ($name eq 'yak') {
print "yak about $self->{'name'}\n";
}
##Handle all other valid methods.
else {
if (@_) {
return $self->{$name} = shift;
} else {
return $self->{$name};
}
}
}
This implements not only the simple class methods but more complex
methods depending on what calls AUTOLOAD. What I'm wondering about is
the 'sanity' of this idea. This appeals to my Laziness and Impatience,
but I wonder about an excess of Hubris, which comes before the core
dump. What do I pay for having the proxy(besides the reference
to the hash of permitted methods)? Is it speed or memory, or nothing
at all? What about extending it as I did above? There is certainly
more code to call for each method and it isn't as clear as writing
every method out, but is there something more that I'm missing?
I'd appreciate any comments people have about this,
Colin
------------------------------
Date: 6 May 1997 20:26:56 -0700
From: philip@rintintin.sierra.com (Philip Hallstrom)
Subject: rdist'ing /usr/local/lib/perl5/ ???
Message-Id: <5kosq0$stk$1@rintintin.sierra.com>
Hi all,
We are in the midst of reorganizing our website and are planning
on moving some parts of the site to different machines. We have a lot
of perl cgi scripts and quite a few extra modules installed.
I'm not looking forward to remembering to install module X onto
each of the machines to keep them all up to date.
Can anyone think of a reason not to use rdist to keep them in sync? All
of our machines are Solaris 2.5.1 SPARCS. I searched through
/usr/local/lib/perl5/* and could only find site specific info in
Config.pm (such as "mydomain"), but there wasn't any host specific info.
The other option is to NFS mount the directory (or maybe just /usr/local
for ultimate convenience :), but I've heard that NFS is a bit of a hog
and if you can get around it, do it.
Thoughts?
(Please reply via email if possible. This group gets enough traffic as
it is.)
Thanks!
-philip
--
--
Philip Hallstrom Sierra On-Line, Inc.
philip.hallstrom@sierra.com http://www.sierra.com/
------------------------------
Date: Sat, 3 May 1997 20:34:50 -0400
From: Samson Melamed <samson@otterspace.com>
Subject: REGEXP HELP, PLEASE!
Message-Id: <Pine.LNX.3.96.970503202957.1012A-100000@redfox.org>
Hello,
I'm working on a project, and I've stumbled in my fluency in Regexpese.
;-) I need three subroutines, each to parse the following lines as
described through a '$var =~ /regexp/' If anyone can send me the regexps
to do that, I would be very greateful.
Thanks a lot,
Samson
N3TJU MELAMED, SAMSON LIC ISU 15-FEB-1997
GENERAL 10422 BURNT EMBER DR LIC EXP 19-SEP-2004
SILVER SPRING MD 20903 LST UPD 15-FEB-1997
---
In the first line:
N3TJU MELAMED, SAMSON LIC ISU 15-FEB-1997
I'd like it so:
$1 = "N3TJU"
$2 = "MELAMED"
$3 = "SAMSON"
$4 = "15"
$5 = "FEB"
$6 = "1997"
---
In the second line:
GENERAL 10422 BURNT EMBER DR LIC EXP 19-SEP-2004
$1 = "GENERAL"
$2 = "10422 BURNT EMBER DR"
$3 = "19"
$4 = "SEP"
$5 = "2004"
---
In the last line:
SILVER SPRING MD 20903 LST UPD 15-FEB-1997
$1 = "SILVER SPRING"
$2 = "MD
$3 = "20903
$4 = "15"
$5 = "FEB"
$6 = "1997"
- EOF -
Thanks a lot!
******************************************************************************
Unless one carefully examines in order to ascertain if one's path is the path
of truth, the slightest initial distortion later becomes a large distortion.
Chi No Maki (The Earth Book) from _The Book of Five Rings_
Miyamoto Musashi, 1645
******************************************************************************
Finger samson@otterspace.com to get the PGP public key for signature
validation.
------------------------------
Date: Wed, 07 May 1997 01:26:49 GMT
From: soccer@microserve.net (Geoffrey Hebert)
Subject: Re: REQ: Script to send mail to LIST of persons
Message-Id: <5koklr$sc2$1@news3.microserve.net>
Ortwin Glueck v/o Odi <ogluck@g26.ethz.ch> wrote:
>Looking for a script that sends a text-file to the e-mail adresses
>listed in another file.
Follow signature instructions below. Besure to use password
perlmisc. This is my test page. Follow the instructions for perl
cross-reference. (I am developing a cross reference). I test by
createin a cross reference of one of my perl scripts. This is you
lucky day. There is a script there called email.cgi that does
exactly what you want.
>Anyone got one or wants to write one?
>mailto:ogluck@g26.ethz.ch
------- signature ----------
Check out the Perl site!
http://www.microserve.net/~soccer/
use password perlmisc
Geat tool for Developers>
------------------------------
Date: 6 May 1997 23:25:32 -0400
From: clay@panix.com (Clay Irving)
Subject: Re: Script runs fine from shell, but browser doesn't receive variables ::SIGH::
Message-Id: <5kosnc$1v0@panix.com>
::SIGH::
Hmm? I believe your module namespace is incorrect in the above example...
Perhaps you meant:
CGI::SIGH
--
Clay Irving See the happy moron,
clay@panix.com He doesn't give a damn,
http://www.panix.com/~clay I wish I were a moron,
My God! Perhaps I am!
------------------------------
Date: 7 May 1997 03:05:07 GMT
From: Steve Vanechanos <s..vanechanos@postoffice.worldnet.att.net>
Subject: World Renowned Perl Author Randal Schwartz Teaching Open Perl Class in NYC/NJ
Message-Id: <5korh3$fn6@mtinsc05.worldnet.att.net>
We are sponsoring a one day advanced perl seminar, taught by World
Renowned co-author of the Camel Book Randal Schwartz, in Fairfield NJ on
May 15th.
Details at http://www.dynamicweb.com/perl_class.html
--
Steve Vanechanos, CEO http://www.dynamicweb.com
DynamicWeb Enterprises, Inc Voice: 201-244-1000
271 Rt 46 West; Building F Fax: 201-777-7428
Fairfield NJ 07004 Email: stevev@dynamicweb.com
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 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.
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 443
*************************************
