[25184] in Perl-Users-Digest
Perl-Users Digest, Issue: 7433 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun Nov 21 06:05:39 2004
Date: Sun, 21 Nov 2004 03:05:05 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 21 Nov 2004 Volume: 10 Number: 7433
Today's topics:
Copying a folder (Jim)
Re: Copying a folder <1usa@llenroc.ude.invalid>
Re: Copying a folder <nospam@bigpond.com>
Re: Copying a folder <tadmc@augustmail.com>
Re: Copying a folder <tassilo.von.parseval@rwth-aachen.de>
Re: CTRL-Z on Win32 <perl&nntp@rhesa.com>
Re: CTRL-Z on Win32 <1usa@llenroc.ude.invalid>
Re: CTRL-Z on Win32 <see@sig.invalid>
Re: CTRL-Z on Win32 <wksmith@optonline.net>
Re: CTRL-Z on Win32 <wksmith@optonline.net>
Re: CTRL-Z on Win32 <wksmith@optonline.net>
FAQ 4.43: How do I compute the difference of two arrays <comdog@panix.com>
FAQ 5.34: Why doesn't glob("*.*") get all the files? <comdog@panix.com>
Re: finding the number of keys in hash <kjetilskotheim@yahoo.com>
Re: finding the number of keys in hash <jurgenex@hotmail.com>
Re: how *.cgi file can get the parameters from client? <spamtrap@dot-app.org>
Re: Localtime returning wrong month <kjetilskotheim@yahoo.com>
Re: OT irregardless <tadmc@augustmail.com>
Re: OT irregardless <uri@stemsystems.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 20 Nov 2004 20:46:19 -0800
From: garvey_jim@yahoo.com (Jim)
Subject: Copying a folder
Message-Id: <3327e074.0411202046.6c90398e@posting.google.com>
Hi,
My company has an office in Europe. I oftem have to download
files/directories from a server there. I'd like to write a script
that will download these dirs automaticaly for me. I can access the
files via a browser (it is a windows view, has "parent direcoty" link,
etc), I right click the directory, copy it, and then paste the dir to
my hard drive.
I'm not sure how to go about doing this in perl. Any help or thoughts
would be appreciated.
------------------------------
Date: 21 Nov 2004 05:06:30 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: Copying a folder
Message-Id: <Xns95A8118E7B8Easu1cornelledu@132.236.56.8>
garvey_jim@yahoo.com (Jim) wrote in
news:3327e074.0411202046.6c90398e@posting.google.com:
> Hi,
>
> My company has an office in Europe. I oftem have to download
> files/directories from a server there. I'd like to write a script
> that will download these dirs automaticaly for me. I can access the
> files via a browser (it is a windows view, has "parent direcoty" link,
> etc), I right click the directory, copy it, and then paste the dir to
> my hard drive.
>
> I'm not sure how to go about doing this in perl. Any help or thoughts
> would be appreciated.
I am guessing you are on Windows accessing a share on a Windows server.
As far as I can see, there is no point in writing a script for this. Just
write a batch file with the appropriate copy command in it.
Sinan.
------------------------------
Date: Sun, 21 Nov 2004 15:12:38 +1000
From: Gregory Toomey <nospam@bigpond.com>
Subject: Re: Copying a folder
Message-Id: <30ame7F2v01bsU1@uni-berlin.de>
Jim wrote:
> Hi,
>
> My company has an office in Europe. I oftem have to download
> files/directories from a server there. I'd like to write a script
> that will download these dirs automaticaly for me. I can access the
> files via a browser (it is a windows view, has "parent direcoty" link,
> etc), I right click the directory, copy it, and then paste the dir to
> my hard drive.
>
> I'm not sure how to go about doing this in perl. Any help or thoughts
> would be appreciated.
Use Rsync or wget
http://samba.anu.edu.au/rsync/
gtoomey
------------------------------
Date: Sat, 20 Nov 2004 23:08:57 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Copying a folder
Message-Id: <slrncq08n9.db5.tadmc@magna.augustmail.com>
Jim <garvey_jim@yahoo.com> wrote:
> My company has an office in Europe. I oftem have to download
> files/directories from a server there.
What kind of server?
An FTP server? A web server? ...
> I'd like to write a script
> that will download these dirs automaticaly for me. I can access the
> files via a browser
Looks like a web server then.
> I'm not sure how to go about doing this in perl.
perldoc -q fetch
How do I fetch an HTML file?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sun, 21 Nov 2004 08:28:55 +0100
From: "Tassilo v. Parseval" <tassilo.von.parseval@rwth-aachen.de>
Subject: Re: Copying a folder
Message-Id: <slrncq0gtn.q2.tassilo.von.parseval@localhost.localdomain>
Also sprach A. Sinan Unur:
> garvey_jim@yahoo.com (Jim) wrote in
> news:3327e074.0411202046.6c90398e@posting.google.com:
>
>> Hi,
>>
>> My company has an office in Europe. I oftem have to download
>> files/directories from a server there. I'd like to write a script
>> that will download these dirs automaticaly for me. I can access the
>> files via a browser (it is a windows view, has "parent direcoty" link,
>> etc), I right click the directory, copy it, and then paste the dir to
>> my hard drive.
>>
>> I'm not sure how to go about doing this in perl. Any help or thoughts
>> would be appreciated.
>
> I am guessing you are on Windows accessing a share on a Windows server.
> As far as I can see, there is no point in writing a script for this. Just
> write a batch file with the appropriate copy command in it.
It might equally well be an FTP server. Windows has the uncanny ability
to squeeze everything into the Explorer-mindset (dragging around folders
etc.). That may be nice for a user who basically gets away with only one
concept, but it creates analogies where there shouldn't be any from a
technical point of view.
Tassilo
--
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval
------------------------------
Date: Sun, 21 Nov 2004 03:15:25 +0100
From: Rhesa Rozendaal <perl&nntp@rhesa.com>
Subject: Re: CTRL-Z on Win32
Message-Id: <419ffa3d$0$65124$e4fe514c@news.xs4all.nl>
Bill Smith wrote:
> I recently bought the O'REILLY book "Learning Perl on Win32 Systems".
> The introduction indicates that some modules that work under NT will
> not work under other version of windows. There is no indication that
> basic I/O might be different.
There might be though, since the shells of Win95/98/ME are different
from those of WinNT/2000/XP.
> EXERCISE
> 1. Write a program that reads a list of strings on separate lines and
> prints out the list in reverse order. If you're reading the list from
> the console, you'll probably need to delimit the end of the list by
> pressing CTRL-Z.
I may be mistaken, but I'm pretty sure the text in that excercise is
wrong. ctrl-z on unix typically suspends the current process. You'd use
ctrl-d on unix to signal end of output.
"perldoc -q eof" gives me this question:
Why can't my script read from STDIN after I gave it EOF (^D on Unix,
^Z on MS-DOS)?
> ANSWER
> print "Enter the list of strings:\n";
> print reverse <STDIN>";
What's that " doing there? You must have made a typo.
> The result using console input is correct except that the last line of
> input is not printed.
Did you enter the ctrl-z on a new line?
It works for me on windows 2000 and up, so you may indeed have run into
an IO difference between 98 and NT here. There's not much perl can do
for you. Just make sure you type in an extra blank line before doing ctrl-z.
Rhesa
------------------------------
Date: 21 Nov 2004 02:52:54 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: CTRL-Z on Win32
Message-Id: <Xns95A7DE97E3691asu1cornelledu@132.236.56.8>
"Bill Smith" <wksmith@optonline.net> wrote in
news:XySnd.26936$hc5.16147625@news4.srv.hcvlny.cv.net:
use strict;
use warnings;
> print "Enter the list of strings:\n";
> print reverse <STDIN>";
D:\Home> perl st.pl
String found where operator expected at st.pl line 5, at end of line
(Missing semicolon on previous line?)
Can't find string terminator '"' anywhere before EOF at st.pl line 5.
> The result using console input is correct except that the last line of
> input is not printed.
It seems like, with command.com (0Win 98 SE), the following "works":
D:\Home> cat st.pl
use strict;
use warnings;
print "Enter the list of strings:\n";
print "\n", reverse <STDIN>;
D:\Home> perl st.pl
Enter the list of strings:
1
2
3
3
2
1
You will notice that the newline is not printed.
I am sure it's got something to do with some bug somewherein command com
but who knows.
Sinan.
------------------------------
Date: Sat, 20 Nov 2004 22:23:51 -0500
From: Bob Walton <see@sig.invalid>
Subject: Re: CTRL-Z on Win32
Message-Id: <41a007db$1_4@127.0.0.1>
Bill Smith wrote:
> My apology in advance to any who may consider this a Win32 question
> rather than a perl question.
>
> I recently bought the O'REILLY book "Learning Perl on Win32 Systems".
> The introduction indicates that some modules that work under NT will not
> work under other version of windows. There is no indication that basic
> I/O might be different.
>
> My problem is that none of the solutions to Chapter 3 Exercise 1 work on
> my system (AS Perl v5.6.1 under Windows ME).
>
> EXERCISE
> 1. Write a program that reads a list of strings on separate lines and
> prints out the list in reverse order. If you're reading the list from
> the console, you'll probably need to delimit the end of the list by
> pressing CTRL-Z.
> ANSWER
> print "Enter the list of strings:\n";
> print reverse <STDIN>";
>
> The result using console input is correct except that the last line of
> input is not printed.
>
> I have searched the AS documentation and perldoc -q for "CTRL-Z" and for
> "end-of-file" without success. Would someone here please explain the
> problem and suggest a perl solution.
Try entering control-Z as the first character of a line. Windoze (at
least some versions) considers the control-Z to be a data character if
control-Z isn't the first thing typed on a line -- and note that you'll
also need to press the Enter key after typing the control-Z. And it is
a Windoze issue, not a Perl issue, as the same thing will happen with
programs in other languages.
...
> Bill
>
>
--
Bob Walton
Email: http://bwalton.com/cgi-bin/emailbob.pl
------------------------------
Date: Sun, 21 Nov 2004 03:45:55 GMT
From: "Bill Smith" <wksmith@optonline.net>
Subject: Re: CTRL-Z on Win32
Message-Id: <TbUnd.27084$hc5.16397021@news4.srv.hcvlny.cv.net>
"A. Sinan Unur" <1usa@llenroc.ude.invalid> wrote
> use strict;
> use warnings;
>
> > print "Enter the list of strings:\n";
> > print reverse <STDIN>";
>
> D:\Home> perl st.pl
> String found where operator expected at st.pl line 5, at end of line
> (Missing semicolon on previous line?)
> Can't find string terminator '"' anywhere before EOF at st.pl line 5.
Sorry about the extra quote mark. I intended to emphasize the direct
quote. After I realized the confusion, I failed to fix it correctly.
>
> > The result using console input is correct except that the last line
of
> > input is not printed.
>
> It seems like, with command.com (0Win 98 SE), the following "works":
>
> D:\Home> cat st.pl
> use strict;
> use warnings;
>
> print "Enter the list of strings:\n";
> print "\n", reverse <STDIN>;
>
>
> D:\Home> perl st.pl
> Enter the list of strings:
> 1
> 2
> 3
> 3
> 2
> 1
>
> You will notice that the newline is not printed.
>
> I am sure it's got something to do with some bug somewherein command
com
> but who knows.
>
I had already discovered a similar work-around, but not coded it so
conceisly. It seems that the first line of output, after the CTRL-Z in
STDIN, is lost. This may be the best solution.
------------------------------
Date: Sun, 21 Nov 2004 04:00:01 GMT
From: "Bill Smith" <wksmith@optonline.net>
Subject: Re: CTRL-Z on Win32
Message-Id: <5pUnd.27121$hc5.16431195@news4.srv.hcvlny.cv.net>
"Bob Walton" <see@sig.invalid> wrote in message
news:41a007db$1_4@127.0.0.1...
> Bill Smith wrote:
>
> > My apology in advance to any who may consider this a Win32 question
> > rather than a perl question.
> >
> > I recently bought the O'REILLY book "Learning Perl on Win32
Systems".
> > The introduction indicates that some modules that work under NT will
not
> > work under other version of windows. There is no indication that
basic
> > I/O might be different.
> >
> > My problem is that none of the solutions to Chapter 3 Exercise 1
work on
> > my system (AS Perl v5.6.1 under Windows ME).
> >
> > EXERCISE
> > 1. Write a program that reads a list of strings on separate lines
and
> > prints out the list in reverse order. If you're reading the list
from
> > the console, you'll probably need to delimit the end of the list by
> > pressing CTRL-Z.
> > ANSWER
> > print "Enter the list of strings:\n";
> > print reverse <STDIN>";
> >
> > The result using console input is correct except that the last line
of
> > input is not printed.
> >
> > I have searched the AS documentation and perldoc -q for "CTRL-Z" and
for
> > "end-of-file" without success. Would someone here please explain
the
> > problem and suggest a perl solution.
>
> Try entering control-Z as the first character of a line. Windoze (at
> least some versions) considers the control-Z to be a data character if
> control-Z isn't the first thing typed on a line -- and note that
you'll
> also need to press the Enter key after typing the control-Z. And it
is
> a Windoze issue, not a Perl issue, as the same thing will happen with
> programs in other languages.
>
You certainly clarified a secondary issue. The symptom that I described
can only happen if the CTRL-Z is the first character of the first line
after the last string.
------------------------------
Date: Sun, 21 Nov 2004 04:08:36 GMT
From: "Bill Smith" <wksmith@optonline.net>
Subject: Re: CTRL-Z on Win32
Message-Id: <8xUnd.27146$hc5.16451722@news4.srv.hcvlny.cv.net>
----- Original Message -----
From: "Rhesa Rozendaal" <perl&nntp@rhesa.com>
Newsgroups: comp.lang.perl.misc
Sent: Saturday, November 20, 2004 9:15 PM
Subject: Re: CTRL-Z on Win32
> Bill Smith wrote:
>
> > I recently bought the O'REILLY book "Learning Perl on Win32
Systems".
> > The introduction indicates that some modules that work under NT
will
> > not work under other version of windows. There is no indication
that
> > basic I/O might be different.
>
> There might be though, since the shells of Win95/98/ME are different
> from those of WinNT/2000/XP.
I suspected that.
>
> > EXERCISE
> > 1. Write a program that reads a list of strings on separate lines
and
> > prints out the list in reverse order. If you're reading the list
from
> > the console, you'll probably need to delimit the end of the list by
> > pressing CTRL-Z.
>
> I may be mistaken, but I'm pretty sure the text in that excercise is
> wrong. ctrl-z on unix typically suspends the current process. You'd
use
> ctrl-d on unix to signal end of output.
>
> "perldoc -q eof" gives me this question:
>
> Why can't my script read from STDIN after I gave it EOF (^D on
Unix,
> ^Z on MS-DOS)?
This does not answer the question, but it does confirm that CTRL-Z is
the
correct charcater for eof.
>
> > ANSWER
> > print "Enter the list of strings:\n";
> > print reverse <STDIN>";
>
> What's that " doing there? You must have made a typo.
Right! I originally used quotes to indicate quotes from the book. When
I
realized the confusion that caused, I tried to remove them.
>
> > The result using console input is correct except that the last line
of
> > input is not printed.
>
> Did you enter the ctrl-z on a new line?
Tried it both ways. It is ignored if it is not at the start of a line.
>
> It works for me on windows 2000 and up, so you may indeed have run
into
Thanks for trying it on other systems. I expected it to work, but hoped
that it would not.
> an IO difference between 98 and NT here. There's not much perl can do
> for you. Just make sure you type in an extra blank line before doing
ctrl-z.
This solution does not work in general. If I remove the call to
reverse, it
is the first string that is not printed. If a blank lines is supplied
at
the end, it is printed.
------------------------------
Date: Sun, 21 Nov 2004 11:03:03 +0000 (UTC)
From: PerlFAQ Server <comdog@panix.com>
Subject: FAQ 4.43: How do I compute the difference of two arrays? How do I compute the intersection of two arrays?
Message-Id: <cnpsl7$rud$1@reader1.panix.com>
This message is one of several periodic postings to comp.lang.perl.misc
intended to make it easier for perl programmers to find answers to
common questions. The core of this message represents an excerpt
from the documentation provided with Perl.
--------------------------------------------------------------------
4.43: How do I compute the difference of two arrays? How do I compute the intersection of two arrays?
Use a hash. Here's code to do both and more. It assumes that each
element is unique in a given array:
@union = @intersection = @difference = ();
%count = ();
foreach $element (@array1, @array2) { $count{$element}++ }
foreach $element (keys %count) {
push @union, $element;
push @{ $count{$element} > 1 ? \@intersection : \@difference }, $element;
}
Note that this is the *symmetric difference*, that is, all elements in
either A or in B but not in both. Think of it as an xor operation.
--------------------------------------------------------------------
Documents such as this have been called "Answers to Frequently
Asked Questions" or FAQ for short. They represent an important
part of the Usenet tradition. They serve to reduce the volume of
redundant traffic on a news group by providing quality answers to
questions that keep coming up.
If you are some how irritated by seeing these postings you are free
to ignore them or add the sender to your killfile. If you find
errors or other problems with these postings please send corrections
or comments to the posting email address or to the maintainers as
directed in the perlfaq manual page.
Note that the FAQ text posted by this server may have been modified
from that distributed in the stable Perl release. It may have been
edited to reflect the additions, changes and corrections provided
by respondents, reviewers, and critics to previous postings of
these FAQ. Complete text of these FAQ are available on request.
The perlfaq manual page contains the following copyright notice.
AUTHOR AND COPYRIGHT
Copyright (c) 1997-2002 Tom Christiansen and Nathan
Torkington, and other contributors as noted. All rights
reserved.
This posting is provided in the hope that it will be useful but
does not represent a commitment or contract of any kind on the part
of the contributers, authors or their agents.
------------------------------
Date: Sun, 21 Nov 2004 05:03:01 +0000 (UTC)
From: PerlFAQ Server <comdog@panix.com>
Subject: FAQ 5.34: Why doesn't glob("*.*") get all the files?
Message-Id: <cnp7i5$mor$1@reader1.panix.com>
This message is one of several periodic postings to comp.lang.perl.misc
intended to make it easier for perl programmers to find answers to
common questions. The core of this message represents an excerpt
from the documentation provided with Perl.
--------------------------------------------------------------------
5.34: Why doesn't glob("*.*") get all the files?
Because even on non-Unix ports, Perl's glob function follows standard
Unix globbing semantics. You'll need "glob("*")" to get all (non-hidden)
files. This makes glob() portable even to legacy systems. Your port may
include proprietary globbing functions as well. Check its documentation
for details.
--------------------------------------------------------------------
Documents such as this have been called "Answers to Frequently
Asked Questions" or FAQ for short. They represent an important
part of the Usenet tradition. They serve to reduce the volume of
redundant traffic on a news group by providing quality answers to
questions that keep coming up.
If you are some how irritated by seeing these postings you are free
to ignore them or add the sender to your killfile. If you find
errors or other problems with these postings please send corrections
or comments to the posting email address or to the maintainers as
directed in the perlfaq manual page.
Note that the FAQ text posted by this server may have been modified
from that distributed in the stable Perl release. It may have been
edited to reflect the additions, changes and corrections provided
by respondents, reviewers, and critics to previous postings of
these FAQ. Complete text of these FAQ are available on request.
The perlfaq manual page contains the following copyright notice.
AUTHOR AND COPYRIGHT
Copyright (c) 1997-2002 Tom Christiansen and Nathan
Torkington, and other contributors as noted. All rights
reserved.
This posting is provided in the hope that it will be useful but
does not represent a commitment or contract of any kind on the part
of the contributers, authors or their agents.
------------------------------
Date: Sun, 21 Nov 2004 05:52:43 +0100
From: "Kjetil Skotheim" <kjetilskotheim@yahoo.com>
Subject: Re: finding the number of keys in hash
Message-Id: <opshss55latm9jxl@edelweiss.upc.no>
On Fri, 19 Nov 2004 14:16:31 -0500, DnaDude <ustun@wam.umd.edu> wrote:
> I would like to compute the number of keys in a hash,
> as in below, but without using a temporary variable.
>
> #this works
> @foo = keys %$A;
> $number = $#{@foo};
>
> ($A is a reference to a hash). So why does
>
> $number = $#{keys %$A}; or
> $number = $#{@{keys %$A}};
>
> not work?
Try this:
print "The number of keys is: ".(0+keys%$A)."\n";
The secret is forcing scalar context upon keys%$A, this works as well:
$num_of_keys=keys%$A;
------------------------------
Date: Sun, 21 Nov 2004 05:24:35 GMT
From: "Jürgen Exner" <jurgenex@hotmail.com>
Subject: Re: finding the number of keys in hash
Message-Id: <nEVnd.517$Rs2.132@trnddc03>
Kjetil Skotheim wrote:
> print "The number of keys is: ".(0+keys%$A)."\n";
>
> The secret is forcing scalar context upon keys%$A,
True, but you got a little bit confused.
- You add 0 if you want to ensure numerical treatment of your values
- You use scalar() to enforce scalar context (big surprise there)
If you would add zero to enforce scalar context then you would get wrong
results in case your value is a string, not a number.
jue
------------------------------
Date: Sun, 21 Nov 2004 05:32:58 -0500
From: Sherm Pendley <spamtrap@dot-app.org>
Subject: Re: how *.cgi file can get the parameters from client?
Message-Id: <o4qdnd-vDMMy8z3cRVn-qA@adelphia.com>
Alont wrote:
> actually, I love the GOOGLE usenet search
Who said anything about searching usenet? Search the web.
Or, just open a command prompt and type "perldoc CGI". Not as pretty,
but just as informative as the HTML docs.
sherm--
--
Cocoa programming in Perl: http://camelbones.sourceforge.net
Hire me! My resume: http://www.dot-app.org
------------------------------
Date: Sun, 21 Nov 2004 05:39:38 +0100
From: "Kjetil Skotheim" <kjetilskotheim@yahoo.com>
Subject: Re: Localtime returning wrong month
Message-Id: <opshsskcp3tm9jxl@edelweiss.upc.no>
On Sun, 17 Oct 2004 15:01:07 -0400, Deke <Deke@nospam.com> wrote:
> ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)
> = localtime(time);
>
> print "\n$sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst \n";
>
> When I run this today. It gives me 9 for the month ($mon) instead of 10.
> Why is that?
>
> Output : 56,0,15,17,9,104,0,290,1
>
> Date command on the Unix commandline returns Sun Oct 17 14:58:58 EDT 2004
Well, this is actually how the documentation says it should be.
In programming the 0th is often the 1st... If you read the
documentation carefully (perldoc perlfunc) is says:
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)
= localtime(time);
....and $mon is the month itself, in the range 0..11
with 0 indicating January and 11 indicating December
Probably not ideal, but its not Perl's fault, i think, because it just
uses an underlaying operation system call. However, it facilitates:
print "Month: ".[qw/Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov
Dec/]->[(localtime())[4]]."\n";
------------------------------
Date: Sat, 20 Nov 2004 23:04:47 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: OT irregardless
Message-Id: <slrncq08ff.db5.tadmc@magna.augustmail.com>
Uri Guttman <uri@stemsystems.com> wrote:
>>>>>> "TM" == Tad McClellan <tadmc@augustmail.com> writes:
> TM> I literally blow my top when someone hits "my buttons"
> TM> irregardless of their first language, i.e. using
> ^^^^^^^^^^^^
>
> should be regardless.
Well yes. Notice that all 3 of my buttons were included
in that one sentence?
> TM> "irregardless" instead of "regardless".
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Sun, 21 Nov 2004 06:08:29 GMT
From: Uri Guttman <uri@stemsystems.com>
Subject: Re: OT irregardless
Message-Id: <x7pt277mzm.fsf@mail.sysarch.com>
>>>>> "TM" == Tad McClellan <tadmc@augustmail.com> writes:
TM> Uri Guttman <uri@stemsystems.com> wrote:
>>>>>>> "TM" == Tad McClellan <tadmc@augustmail.com> writes:
TM> I literally blow my top when someone hits "my buttons"
TM> irregardless of their first language, i.e. using
>> ^^^^^^^^^^^^
>>
>> should be regardless.
TM> Well yes. Notice that all 3 of my buttons were included
TM> in that one sentence?
i literally saw the first when i read it. the third example (e.g. i.e.)
only came to me on the second read.
TM> "irregardless" instead of "regardless".
your antiirregardlessness is refreshing.
uri
--
Uri Guttman ------ uri@stemsystems.com -------- http://www.stemsystems.com
--Perl Consulting, Stem Development, Systems Architecture, Design and Coding-
Search or Offer Perl Jobs ---------------------------- http://jobs.perl.org
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
#The Perl-Users Digest is a retransmission of the USENET newsgroup
#comp.lang.perl.misc. For subscription or unsubscription requests, send
#the single line:
#
# subscribe perl-users
#or:
# unsubscribe perl-users
#
#to almanac@ruby.oce.orst.edu.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
#To request back copies (available for a week or so), send your request
#to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
#where x is the volume number and y is the issue number.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 7433
***************************************
