[19866] in Perl-Users-Digest
Perl-Users Digest, Issue: 2061 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Nov 3 21:05:32 2001
Date: Sat, 3 Nov 2001 18:05:06 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <1004839505-v10-i2061@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 3 Nov 2001 Volume: 10 Number: 2061
Today's topics:
Re: File parseing and testing for existing data <mpsilva@csupomona.edu>
Need help with character substitution <pauls@cascadelinear.com>
Re: Need help with character substitution <Laocoon@eudoramail.com>
Re: Need help with character substitution <tony_curtis32@yahoo.com>
Re: Newbie help please with free perl form scripts <tim@vegeta.ath.cx>
Re: PerlQT and QListView <jens@irs-net.com>
Re: Question on regExp and Escape Sequences <w_oden@hotmail.com>
Re: reading flat-file db and replacing a word <stuart@otenet.gr>
Re: reading flat-file db and replacing a word (Tad McClellan)
Re: reading flat-file db and replacing a word <bootsy52@gmx.net>
Re: Regexp for email address (Glenn White)
Sending Content Type in email (Glenn White)
Re: Serving HTML images <stuart@otenet.gr>
Re: Serving HTML images <flavell@mail.cern.ch>
Re: Tainting with Tad <was Taint problem with BEGIN blo <mgjv@tradingpost.com.au>
Re: Tainting with Tad <was Taint problem with BEGIN blo (Tad McClellan)
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 3 Nov 2001 16:49:22 -0800
From: "Matias P. Silva" <mpsilva@csupomona.edu>
Subject: Re: File parseing and testing for existing data
Message-Id: <9s236j$1jbl0$1@hades.csu.net>
Thanks for your help in the comp.lang.PERL.misc newsgroup.
I have used your suggestions to improve my PERL script.
Best,
Matias
"Benjamin Goldberg" <goldbb2@earthlink.net> wrote in message
news:3BDD6520.64120B6D@earthlink.net...
> Matias P. Silva wrote:
> >
> > sure thing, this is what a record in my file looks like....
> >
> > mpsilva,Matias,P,Silva,525 S. Wilson
> > Ave.,Pasadena,CA,91106,USGS,mpsilva@usgs.gov,626 583 6798,Sat Oct 27
> > 16:21:01 2001,
>
> my $lookingfor = "$userid,$firstName,$midInitial,$lastName";
> while( <USERFILE> ) {
> next unless index($_, $lookingfor) == 0;
> print;
> }
>
> --
> Klein bottle for rent - inquire within.
------------------------------
Date: Sat, 03 Nov 2001 16:43:42 -0800
From: Paul Spitalny <pauls@cascadelinear.com>
Subject: Need help with character substitution
Message-Id: <3BE48F3D.3C444721@cascadelinear.com>
Hi ,
I have a file with a bunch of lines of text like this:
i12.i35.i57
I want to substitute all instances of "i" with and "xi" like so:
xi12.xi35.xi57
I know I need to do something like the following, but it won't work:
$line = s/i/xi/g;
the problem is that the x is a pattern match for 0 or more of something.
So, what is the correct syntax?
I also have a similar problem where some lines of my files have a dot
"." that needs to be changed into another character but the dot matches
any character except newline. So, it is a very similar problem where I
want to match to a particular character that Perl happens to use as a
regular expression match.
Need help!
Thanks,
Paul
------------------------------
Date: Sun, 4 Nov 2001 02:03:03 +0100
From: Laocoon <Laocoon@eudoramail.com>
Subject: Re: Need help with character substitution
Message-Id: <Xns914F14E406168Laocooneudoramailcom@62.153.159.134>
Paul Spitalny <pauls@cascadelinear.com> wrote in news:3BE48F3D.3C444721
@cascadelinear.com:
> Hi ,
> I have a file with a bunch of lines of text like this:
> i12.i35.i57
> I want to substitute all instances of "i" with and "xi" like so:
> xi12.xi35.xi57
>
> I know I need to do something like the following, but it won't work:
>
> $line = s/i/xi/g;
See below
> the problem is that the x is a pattern match for 0 or more of something.
No..no..not really..no..beside the fact that you don't use it in your
pattern.. :)
> So, what is the correct syntax?
perldoc perlre
perldoc perlsyn
$line =~ s/i/xi/g;
> I also have a similar problem where some lines of my files have a dot
> "." that needs to be changed into another character but the dot matches
> any character except newline. So, it is a very similar problem where I
> want to match to a particular character that Perl happens to use as a
> regular expression match.
Backslash the .
> Paul
Lao
------------------------------
Date: Sat, 03 Nov 2001 19:18:57 -0600
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: Need help with character substitution
Message-Id: <871yjfgwou.fsf@limey.hpcc.uh.edu>
>> On Sat, 03 Nov 2001 16:43:42 -0800,
>> Paul Spitalny <pauls@cascadelinear.com> said:
> Hi , I have a file with a bunch of lines of text like
> this: i12.i35.i57 I want to substitute all instances of
> "i" with and "xi" like so: xi12.xi35.xi57
> I know I need to do something like the following, but it
> won't work:
> $line = s/i/xi/g;
> the problem is that the x is a pattern match for 0 or
> more of something.
Nonsense. Show real code and real data that demonstrates
this behaviour.
hth
t
--
Oh! I've said too much. Smithers, use the amnesia ray.
------------------------------
Date: Sun, 04 Nov 2001 00:15:08 GMT
From: Tim Hammerquist <tim@vegeta.ath.cx>
Subject: Re: Newbie help please with free perl form scripts
Message-Id: <slrn9u92hq.3sn.tim@vegeta.ath.cx>
[ posted and mailed...by accident =]
Dynamo wrote:
> Sorry but its been a long day. Should have known better than to post in NG
> using HTML (first apology) and you were correct in that I could have found
> out faster about FastHosts and blat using search engines without wasting the
> groups time (second apology). However, what threw me was that my webserver
> (net2.co.uk) who host my site were informing me about fasthost. I mistakenly
> assumed therefore that fasthost was some technology that I needed to get my
> form to work rather than being another webserver!! Are net2 saying to me
> that they don't want my business?
Actually, I got the same picture. Is it possible that fasthosts sublets
its bandwidth to net2? I know out here in the states that there's an
hierarchy of at least 3 companies just in Reno. (eg, Great Basin sublets
to Pyramid, Pyramid sublets to Nanosecond, Nanosecond sublets to other
clients, etc.) And usually any T1 or T3 in the western United States can
be traced back to a UC Berkley T3.
> All the same thanks for your response but just one last query. Being a total
> newbie (el thicko) what do I do with the C:\> perldoc -q "send mail" that
> you mention and how will it help me?
Well, if you're going to be developing perl scripts (or even just
installing them), you should have a copy of the documentation, which
comes with every perl distribution. ActivePerl, notably, comes with a
heavily cross-linked HTML version of the perl docs. A searchable,
command-line interface to the perldocs is perldoc (PERLDOC.BAT on
Win32). The -q tells perldoc to search the questions in the FAQs for
the string following ("send mail"). Running the following on my Win32
box:
C:\ > perldoc -q "send mail"
...would yield the following:
Found in /usr/lib/perl5/5.6.0/pod/perlfaq9.pod
How do I send mail?
Use the `sendmail' program directly:
[ snip ]
Alternate, less convenient approaches include calling mail
(sometimes called mailx) directly or simply opening up port 25
have having an intimate conversation between just you and the
remote SMTP daemon, probably sendmail.
Or you might be able use the CPAN module Mail::Mailer:
use Mail::Mailer;
$mailer =3D Mail::Mailer->new();
$mailer->open({ From =3D> $from_address,
To =3D> $to_address,
Subject =3D> $subject,
})
or die "Can't open: $!\n";
print $mailer $body;
$mailer->close();
The Mail::Internet module uses Net::SMTP which is less
Unix-centric than Mail::Mailer, but less reliable. Avoid raw
SMTP commands. There are many reasons to use a mail transport
agent like sendmail. These include queueing, MX records, and
security.
This admits to being unix-centric, but includes some more generic
solutions. It also seems to hint at using blat or CDONTS, since they
are WinNT Mail Transport Agents (MTAs); they would have to be changed,
however, if you moved to a *nix server.
Does that help?
> Kind Regards
> Paul Robinson
Tim
--
It's not the inital skirt length, it's the upcreep.
------------------------------
Date: Sun, 04 Nov 2001 01:11:30 +0100
From: Jens Luedicke <jens@irs-net.com>
Subject: Re: PerlQT and QListView
Message-Id: <9s217m$ibe$03$1@news.t-online.com>
Magnus Schmidt wrote:
> btw ... PerlQT is rather old, and I wasn't able to find much information
> about PerlQT on the net ... does nobody use this module anymore ?!
I messed around with it a long time ago, and I stopped using it
when it seemed that it was not longer supported/maintained.
The only other Qt2 binding that I have tried is for Ruby.
Gtk+ is currently the best choice for Perl-GUI's. Tk as well,
if you need the platform independence.
--
Jens Luedicke
jens@irs-net.com
------------------------------
Date: Sat, 03 Nov 2001 23:21:35 GMT
From: WODEN <w_oden@hotmail.com>
Subject: Re: Question on regExp and Escape Sequences
Message-Id: <dnu8uts0g8rq5dn9fc0ueikfqpjq3nmlgr@4ax.com>
>You know you dont have to use \ in windoze you can use E:/JuiceMain2 and
>avoid all this hardship. All the file calls in windoze accept / about the
>only thing that dosent is command.com
True that windows lets you use / for file calls. The problem is that
I was trying to change a config file that was written by a different
program. It used \, so I had to find and replace the strings that it
wrote.
Thanks all,
WODEN
------------------------------
Date: Sun, 4 Nov 2001 02:19:35 +0200
From: "Stuart Gall" <stuart@otenet.gr>
Subject: Re: reading flat-file db and replacing a word
Message-Id: <9s22o3$lo3$1@usenet.otenet.gr>
> What do you think of that? Will this be possible solution or did I
> overlook something important?
It is one of the possible solutions.
Your code has a bug I think
>$size = length $1;
>}
>}
>$pos -= $size;
size is the length of the data not the record.
I would suggest using syswrite and not print, then there is no danger of a
bug in the code overwriting other records.
Also I dont like the '#' delimiter why dont you terminate the string with a
semicolon?
That way you can just split and discard the last term when you read.
Also when you write you just add ";######################" (lots of #'s) on
the end and use write to truncate the string.
You could use # as a rouge value in the first field to indicate the record
is deleted.
Perhaps it is better to forget <FILE> method all together if you are going
to use fixed length fields you could just use syswrite and sysread
Something like (Untested)
$LEN=length of record
open (FILE, "+< file.dat")
or die "Could not open File $!\n";
while(sysread FILE,$Rec,$LEN)
{
@Fields=split /;/,$Rec;
if (test the fields for a match)
{
seek(FILE, -$LEN, 1);
$Fields[5]='#'xLEN;
$replace=join(";",@Fields)
syswrite FILE,$replace,$LEN;
last;
}}
close(FILE);
--
Stuart Gall
------------------------------------------------
This message is not provable.
------------------------------
Date: Sun, 04 Nov 2001 01:19:44 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: reading flat-file db and replacing a word
Message-Id: <slrn9u90kt.gse.tadmc@tadmc26.august.net>
Carsten Menke <bootsy52@gmx.net> wrote:
>On Sat, 03 Nov 2001 11:16:42 +0100, Stuart Gall wrote:
>> Or you can design your data structure with a delete flag so that to make
>> a line bigger you overwrite the start with XXXXX or whatever then stick
>> the new longer data at the end. Then do a garbage collection at the
>> weekend.
>>
>> You can make a copy in memory or in another file.
>>
>I have made some thoughts, and, well I can hear all people say use a DB
>then, but this is only what I thought of:
>
>I have my file, for every line in the file I use a fixed line length
^^^^^^^^^^^^^^^^^
That gives you the keys to the kingdom. If you are willing to
live with fixed length records, then you meet the "special
circumstances":
"Another is replacing a sequence of bytes with
another sequence of the same length."
But that doesn't help with deleting.
>ab1000;5;1011002;some comments, here#########################
>then for input, the # character is forbidden, because it is used as a
>seperator.
Eh? That looks to me like semi-colon is being used as a separator,
and # is being used as a padding character.
Why not use fixed length fields within your fixed length records?
Then there would be no need for spending space on separators at all.
[ snip a bunch o' code ]
>If I want to delete a line I just simply fill it with # until it reached
>the fixed line length. Every delete is counted and the result is stored in
>separate file. If I want to add a line, I search for a line beginning
>with # and fill the line up with the string to add.
That's a lot of housekeeping for very little gain (reduced disk space).
>Every day or weekend I look up the separate file where the delete and add
>operations are counted, and if the amount of delete's reaches more than
>20% of the add's for example a cron job is rewriting the file without the
>empty ##### lines.
Yet more housekeeping.
>What do you think of that?
I think it is awful (no offense).
It is high maintenance. It has high development costs. It will
have high maintenance/debugging costs.
>Will this be possible solution or did I
>overlook something important?
I think you may have overlooked money. Lots of people count
that in the "important" category :-)
I still have not seen a cost-benefit analysis justifying such
an expenditure of effort. Let's back up a bit. You said:
CM> what I actually don't want to do is, to make temporary
CM> copies of the file itself or read the whole content into an array
^^^^^^^^^^^ ^^^^^^^^^^^^^
The FAQ shows you how to avoid your second objection, but you've
never said why you do not want to make a copy of the file itself.
Why you do not want to make a copy of the file itself?
I don't see anything in your description that would preclude
just using the -i command line switch and ripping through
your data with a while <> loop.
Development time would be, I dunno, 10 or 20 times more if
you must not use a temporary file. Disk space is cheap.
Programmer time is expensive.
I have not seen anything that is forcing you to go with the
(greatly) more expensive route.
Why do you feel compelled to spend so much time in order to
save disk space that will be used for only a few seconds?
Perhaps you have a good reason and just haven't shared it
with us?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sun, 04 Nov 2001 02:22:05 +0100
From: "Carsten Menke" <bootsy52@gmx.net>
Subject: Re: reading flat-file db and replacing a word
Message-Id: <pan.2001.11.04.02.22.01.400.1740@gmx.net>
On Sun, 04 Nov 2001 01:19:35 +0100, Stuart Gall wrote:
> size is the length of the data not the record.
>
>
> I would suggest using syswrite and not print, then there is no danger of
> a bug in the code overwriting other records. Also I dont like the '#'
> delimiter why dont you terminate the string with a semicolon?
As I said just a thought. :-)
>
> Something like (Untested)
I can test :-)
> $LEN=length of record
> open (FILE, "+< file.dat")
> or die "Could not open File $!\n";
> while(sysread FILE,$Rec,$LEN)
> {
> @Fields=split /;/,$Rec;
> if (test the fields for a match)
> {
> seek(FILE, -$LEN, 1);
> $Fields[5]='#'xLEN;
> $replace=join(";",@Fields)
> syswrite FILE,$replace,$LEN;
> last;
> }}
> close(FILE);
>
Thanx for you input, I was afraid when posting my code snippet of getting
flamed, glad that this had not taken place.
As I mentioned above, It was just a thought, the current situation is
that the records are not of a fixed length. To get this I have to port
all files, the current situation is that I have fields like this,
aaa100;5;1011002;Comments, Notations,
The Problem is that only the 3rd Field has a fixed length all other
fields could vary. For instance I tried to find a solution, of how to
delete a whole line, but how to do that one? I mean delete a whole line
within a file, where always the last character is \n ? Because when
an entry should be changed, the new entry could be shorter than the old
one, so I could not simply overwrite the old one.
Sorry if I'm asking here for somewhat, which may be very simple.
I also think the longterm is to port all files to a fixed record length,
or use MySQl, but you know if you boss is wanting everything at best
yesterday.... there is no room for finding perfect solutions, that's why
I'm currently load all into an array and make my modifications, this is
still possible as the files have sizes around 63K but what about the
future???
Again thankx so far for your input, you have yet helped me a lot
Carsten
------------------------------
Date: Sun, 04 Nov 2001 00:47:59 GMT
From: spam.killer@home.com_nospam (Glenn White)
Subject: Re: Regexp for email address
Message-Id: <Xns914EAAD923B6Bccruizermydejacom@24.0.0.25>
Ilmari Karonen <iltzu@sci.invalid> wrote in
<1004742145.22485@itz.pp.sci.fi>:
>tweaks, it can be made to look like this:
>
> my @fields = split(/;/, $line);
> foreach (@fields) {
> s/$/$default_address/ unless /\@/;
> }
> $line = join(';', @fields);
>
>That's very much a Perlish solution. Just because map() and grep() are
>there doesn't mean they have to be used for everything.
>
>Just to show one more way to do it:
>
> $line =~ s/([^;@]+)([^;]*)/$2 ? "$1$2" : "$1$default_address"/eg;
>
>This will break if any of the fields begins with an '@', though.
>
Ilmari, thanks for all the help and suggestions. I gave each solution a try
just to see how they worked. Since I'm not sure what the skill level of the
person who will be maintaining the code in the future will be, I decided to
modify mine to use the "foreach" loop. It's a clean solution that is easy
to document and should be understandable for just about any skill level.
------------------------------
Date: Sun, 04 Nov 2001 01:18:56 GMT
From: spam.killer@home.com_nospam (Glenn White)
Subject: Sending Content Type in email
Message-Id: <Xns914EB018994A7ccruizermydejacom@24.0.0.25>
I've created a Perl program that runs on NT that uses sendmail to email
text that contains mono-spaced tables. This is not CGI or an attached
document. The persons who receives the email might be reading it on Unix
with a plan vanilla mail reader or on a Win machine using Exchange or
Outlook. The people using the MS products usually have their mail readers
set to display something like Times font.
I can get the email to display in Courier by sending it as html, but that
gets nasty for the people who use a plain vanilla reader. I've been trying
to use:
$mail{'Content-type'} = 'text/plain; charset="iso-8859-1"';
$mail{'Content-type'} = 'text/plain; charset="US-ASCII"';
and a few other variations.
I can see the content type listed in the email header, but the mail
programs will not display it as a mono-type font. I've tried playing with
the font options in Eudora, but have not had any success.
Is it possible for a Perl program to send a "content type" so the email
will be displayed as a mono-type font (such as Courier) even if the user's
default settings are something else? Since I'm trying to do this from a
Perl program, I thought I would ask here first, then try one of the other
related groups.
------------------------------
Date: Sat, 3 Nov 2001 18:46:37 +0200
From: "Stuart Gall" <stuart@otenet.gr>
Subject: Re: Serving HTML images
Message-Id: <9s1uac$iuv$1@usenet.otenet.gr>
"Maarten" <desulfovibrio@hotmail.com> wrote in message
news:914E87AF012547@24.132.65.7...
> ><META HTTP-EQUIV="pragma" CONTENT="no-cache">
> >In the header
>
> That's probably not going to do. The idea is to let 'normal'
> viewers take full advantage of the cache, while yet allowing those
> who provide new images by submitting an url from which a new image
> will be loaded into a database, to view the result immediately --
> which seems to implies updating/invalidating the cache.
Well nocache does make the browser reload all the images at each visit to
the page (on some browsers).
The only way I can thinkof to do it selectively and reliably is to change
the image filename by adding a cycle number on the end and make the html a
cgi.
reload() ? will that work on netscape? On the user interface you need to
hold shift while pressing reload to bypass the cache.
If this discussion is to be continued I would really rather do it by email
as I hinted. We are off topic by a few AUs.
--
Stuart Gall
------------------------------------------------
This message is not provable.
------------------------------
Date: Sun, 4 Nov 2001 01:40:53 +0100
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Serving HTML images
Message-Id: <Pine.LNX.4.30.0111040132390.2170-100000@lxplus023.cern.ch>
On Nov 3, Stuart Gall inscribed on the eternal scroll:
> Well nocache does make the browser reload all the images at each visit to
> the page (on some browsers).
You're hopelessly off-topic for this group. Hmmm, thinks, wasn't I
working-up to silently sticking you in the killfile for this kind of
behaviour?
See http://www.mnot.net/cache_docs/ , especially what it says against
trying to use meta for this kind of thing.
Now review the new-users FAQ for this group and take due notice of
what it says about the importance of partitioning your problem and
seeking answers in the _right_ places. Thank you.
> If this discussion is to be continued I would really rather do it by email
You've got an entire Usenet at your disposal. I think most of us are
too busy to get involved in free one-on-one tutorials. Anyway, when
you find the right groups you should also be able to find their FAQs,
which will at least get you past the usual trivial mistakes and get
you ready to tackle the real meat of the issue. And without
irritating the regulars...
> We are off topic by a few AUs.
ah, well, you got that right, sure enough. Good luck.
------------------------------
Date: Sun, 4 Nov 2001 11:46:15 +1100
From: Martien Verbruggen <mgjv@tradingpost.com.au>
Subject: Re: Tainting with Tad <was Taint problem with BEGIN block>
Message-Id: <slrn9u93un.flu.mgjv@martien.heliotrope.home>
On Sat, 03 Nov 2001 15:17:22 GMT,
Tad McClellan <tadmc@augustmail.com> wrote:
> BUCK NAKED1 <dennis100@webtv.net> wrote:
>
>>I followed Tad's advise
>
>
> s/followed/followed some of/; :-(
>> my $stats = stat("$dir/$f") or die "Can't stat: $!";
>> if ( $stats->mtime < $age ) {
> Tad> perldoc -f stat
He's using File::stat before this BEGIN block (had to go back to the
first post in the thread to make sure about that), so the usage up there
is actually correct, and should be looked up in perldoc File::stat.
>> system("rm", "-r", "$dir/$f");
>> };
>> };
>> 1;
Also, this 1 is unnecessary, unless it is the last bit of the module. A
BEGIN block doesn't need to return a true value, unless it's used by
something. A module needs to return a true value, which I suspect you're
trying to do here. You should however not do that in a BEGIN block.
You did read up what a BEGIN block is, right? In perlsub and perlmod,
for example.
Martien
--
|
Martien Verbruggen | The world is complex; sendmail.cf
| reflects this.
|
------------------------------
Date: Sun, 04 Nov 2001 01:19:45 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Tainting with Tad <was Taint problem with BEGIN block>
Message-Id: <slrn9u91j4.gse.tadmc@tadmc26.august.net>
[ something really funky has happened to your formatting,
your post is barely readable to me.
]
BUCK NAKED1 <dennis100@webtv.net> wrote:
>tadmc@augustmail.com (Tad McClellan)
>> > BEGIN {
> $ENV{PATH} = "/usr/bin:/bin:/usr/local/bin";
>> Why are you not ending the BEGIN block right here?
>Huh? I don't understand this statement.
|
|
Try taking the closing curly brace way down there v somewhere,
and moving it up here.
My theory is that your program will behave the same with the
closing curly right here.
Messing with %ENV is the only thing requiring you to have a
BEGIN block at all. You do not need a BEGIN block for anything
else that you are doing. (as far as I can see, and my immediate
record doesn't provide encouragement that I'm right here either.)
>If I ended it here, it wouldn't
>check the file time and remove the directory; and it's doing that.
Yes it would.
Why do you think that it wouldn't?
BEGIN { 21 lines of code }
and
BEGIN { 1 line of code }
20 lines of code in "main"
Should behave the same, unless something in the last 20 lines
_requires_ being in a BEGIN block (ie. being compiled before
other parts are compiled).
>> my $stats = stat("$dir/$f") or die "Can't stat: $!";
>> if ( $stats->mtime < $age ) {
>I'm using File::stat, in
>case you didn't notice.
Doh! No, I didn't notice.
I owe you an apology.
I am sorry for that rant.
( but I told you I do not read your posts. I did not see your
first post where you mentioned it. You never mentioned it
after I had joined the thread. That'll teach me to dip
down to the bottom of the scorings. We would have both been
better off if I had never read it.
)
>> Following up to you is like talking to my hand...
>I don't know where that comes from. Perhaps you assume too much without
>asking.
In this case I most surely did.
Again, I am sorry.
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 2061
***************************************
