[12665] in Perl-Users-Digest
Perl-Users Digest, Issue: 74 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jul 8 05:07:25 1999
Date: Thu, 8 Jul 1999 02:05:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 8 Jul 1999 Volume: 9 Number: 74
Today's topics:
Re: Accessing POP mail? (I.J. Garlick)
Re: Accessing POP mail? <gellyfish@gellyfish.com>
Re: another Out of Memory error (Ilya Zakharevich)
CGI newsgroup - was Re: Receiving binaries <breville@mpce.mq.edu.au>
Re: Chopping the beginning of a variable (Abigail)
Duisable user input and language independent script ulle73@my-deja.com
Exclusive file IO <joewong@ima.com>
Re: Exclusive file IO (Anno Siegel)
Re: Exclusive file IO <nospam.newton@gmx.net>
Help needed: script to extract Hyperlink <barst@goethe.de>
Help: how to capture other process's stdin/stdout ? <gump_xu@sc.mcel.mot.com>
Re: How to format date and year string? <nospam.newton@gmx.net>
Re: How to format date and year string? (elephant)
Re: How to format date and year string? <gellyfish@gellyfish.com>
How to open text file for reading from Sever side? <abc@abc.com>
Re: I need to hide the source <ehpoole@ingress.com>
Re: Is PERL the way to create a pop-up window ? (Bart Lateur)
Re: Modifying a variable inside a sub (Ronald J Kimball)
Re: My last hope (Andreas Fehr)
Re: Newbie: Get all directories in a directory: <nospam.newton@gmx.net>
Perl Debugger recommendation sought <kevinp@COMPANY.com>
Re: Subroutines in a package (Ronald J Kimball)
Re: Summing Array to Hash elements (Larry Rosler)
Re: UPS shipping code??? (David Efflandt)
Re: UPS shipping code??? <tmornini@netcom9.netcom.com>
Re: Webpages and Perl-Couple of Questions (Abigail)
Re: Webpages and Perl-Couple of Questions (Bart Lateur)
Re: Weird /x regexps (Ronald J Kimball)
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 8 Jul 1999 07:59:09 GMT
From: ijg@connect.org.uk (I.J. Garlick)
Subject: Re: Accessing POP mail?
Message-Id: <FEJKuL.JnG@csc.liv.ac.uk>
In article <7m17rp$rnn$1@starbase.neosoft.com>,
claird@Starbase.NeoSoft.COM (Cameron Laird) writes:
> In article <7lt2fa$191$1@sunb.ocs.mq.edu.au>,
> Brendan Reville <breville@mpce.mq.edu.au> wrote:
>>hi
>>
>>I want to write a Perl script on my web server which pulls incoming mail out
>>of a local POP account. This incoming mail is stored in a mail spool file
>>on a mail server, so I can't access the file directly. Is there any other
>>way to pull the mail out of this POP server?
> .
> .
> .
> Go immediately to Mail::POP3Client from CPAN.
Can someone please tell me what the fascination with the POP3Client on
CPAN is? Graham Barr wrote a perfectly good module that ships with Perl as
standard.
Net::POP3
I have never seen the need for yet another module. Plus you don't need to
install it as it should already be there. (This is a God send if you don't
control your server as many don't).
Before amyone asks, yes I did look at POP3Client.pm but came to the
conclusion it didn't offer anything really significant over POP3.pm
--
Ian J. Garlick
ijg@csc.liv.ac.uk
As long as the answer is right, who cares if the question is wrong?
------------------------------
Date: 8 Jul 1999 09:36:40 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Accessing POP mail?
Message-Id: <37846318@newsread3.dircon.co.uk>
I.J. Garlick <ijg@connect.org.uk> wrote:
> In article <7m17rp$rnn$1@starbase.neosoft.com>,
> claird@Starbase.NeoSoft.COM (Cameron Laird) writes:
>> .
>> Go immediately to Mail::POP3Client from CPAN.
>
> Can someone please tell me what the fascination with the POP3Client on
> CPAN is? Graham Barr wrote a perfectly good module that ships with Perl as
> standard.
>
> Net::POP3
>
I think that Net::POP3 is actively supported whereas POP3Client isnt.
/J\
--
"I thought homogenous culture was a kind of yogurt used to alleviate
thrush" - Ben Elton
------------------------------
Date: 8 Jul 1999 07:14:13 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: another Out of Memory error
Message-Id: <7m1j45$o0h$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Daniel Kranowski
<dkranowsGET.RID@OF.THIS.scdt.intel.com>],
who wrote in article <3783FC6C.60BE@OF.THIS.scdt.intel.com>:
> I found what seems to be the source of the error by commenting out two
> sections of code. Section #1 is a call to a function, foo(), that
> performs a lot of multiplications and divisions. Section #2 enlarges an
> array with "push". The problem happens when the input case is very
> large and the loop around these sections of code is going millions of
> times.
Who cares... But what is the size of the array?
> It seems like I should not run out of memory unless (a) I'm
> allocating where I didn't realize or (b) memory is not getting free'd
> internally. I'm running Perl v 5.004 on a unix system.
>
> I realize it might be hard to divine the problem from that short
> description
At least for me...
> How can you detect
> memory leaks? The -DL debugging option isn't supported
It is - for quite a long time.
> and the -Dm
> option is very hard to use. (I noticed on some simple -Dm examples that
> the number of mallocs/reallocs doesn't equal the number of frees.)
Some of them are called before -Dm was seen.
Ilya
------------------------------
Date: Thu, 8 Jul 1999 17:49:39 +1000
From: "Brendan Reville" <breville@mpce.mq.edu.au>
Subject: CGI newsgroup - was Re: Receiving binaries
Message-Id: <7m1l7e$7i0$1@sunb.ocs.mq.edu.au>
> >this is a little CGI-related but their moderated newsgroup has carked
it..
>
> Anybody figure out what happened to *.authoring.cgi? (vacation I guess)
I think their self-moderating program broke. At one stage, confirmation
emails weren't working, but it was apparently still possible to post to it
by putting in some authorisation keyword in an email. But judging from
traffic, I think it's completely died now.
Which was partly why I posted in here - and thanks to everyone who helped.
I did check the CGI FAQ, but couldn't find information on how *much* binary
data could be posted in practical situations -- the replies in here gave a
good wholistic approach to it all, even the non-Perl-specific parts, so
thanks all.
> >so hopefully it's still relevant here:
> >
> >Can I post a reasonable amount of binary data (say a several kilobyte
> >graphical image) through a form via CGI to a Perl script? Or is this too
> >much data?
>
> CGI.pm uses a tmp files for uploaded files, so you are only limited by
> disk space or quota.
Great, my system should work.
- Brendan
------------------------------
Date: 8 Jul 1999 00:11:07 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Chopping the beginning of a variable
Message-Id: <slrn7o8cm9.ued.abigail@alexandra.delanet.com>
Harry Yu (hyu1@mipos2.intel.com) wrote on MMCXXXVII September MCMXCIII in
<URL:news:37840B50.7A336985@mipos2.intel.com>:
%% Hi,
%% Does anyone know how to chop the beginning characters of a variable.
%% The chop command works for the end of the variable.
%%
%% Ex. $variable = Whatever
%%
%% And I want to get rid of the W, h, a.
%% Anyone know a command or a way to do it?
sub pohc (@) {
my $r;
foreach my $s (@_ ?
@_ :
$_) {
$s = reverse $s;
$r = chop $s;
$s = reverse $s;
}
$r;
}
pohc $variable for 1 .. 3;
Abigail
--
sub f{sprintf$_[0],$_[1],$_[2]}print f('%c%s',74,f('%c%s',117,f('%c%s',115,f(
'%c%s',116,f('%c%s',32,f('%c%s',97,f('%c%s',0x6e,f('%c%s',111,f('%c%s',116,f(
'%c%s',104,f('%c%s',0x65,f('%c%s',114,f('%c%s',32,f('%c%s',80,f('%c%s',101,f(
'%c%s',114,f('%c%s',0x6c,f('%c%s',32,f('%c%s',0x48,f('%c%s',97,f('%c%s',99,f(
'%c%s',107,f('%c%s',101,f('%c%s',114,f('%c%s',10,)))))))))))))))))))))))))
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Thu, 08 Jul 1999 07:15:57 GMT
From: ulle73@my-deja.com
Subject: Duisable user input and language independent script
Message-Id: <7m1j77$3ic$1@nnrp1.deja.com>
Hi,
*)I need to know if there is some way of disabling user input in a
script when running an automated installation on NT?
*)Is there a script tool that is language independent? I need a script
tool that I can use to write an automated installation on NT. NT is
installed in different languages?
Right now I´m using Microsoft's ScriptIt but discovered that to get a
focus on a window you need to know the title of the window. Consequently
I do not know the title of windows due to the different languages I'm
using on NT.
Hope anyone can help me. Thank you!
//ulle
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 8 Jul 1999 13:05:15 +0800
From: "Joe Wong" <joewong@ima.com>
Subject: Exclusive file IO
Message-Id: <7m1btv$13g$1@m5.att.net.hk>
Hi, in Perl, how can do excuslive file I/O? That is only one can read and
write to a file in the same time?
TIA
------------------------------
Date: 8 Jul 1999 05:35:50 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: Exclusive file IO
Message-Id: <7m1dbm$5hr$1@lublin.zrz.tu-berlin.de>
Joe Wong <joewong@ima.com> wrote in comp.lang.perl.misc:
>Hi, in Perl, how can do excuslive file I/O? That is only one can read and
>write to a file in the same time?
perldoc -f flock
Anno
------------------------------
Date: Thu, 08 Jul 1999 08:20:42 +0200
From: "Philip 'Yes, that's my address' Newton" <nospam.newton@gmx.net>
Subject: Re: Exclusive file IO
Message-Id: <3784433A.C08FC4BC@gmx.net>
Anno Siegel wrote:
>
> Joe Wong <joewong@ima.com> wrote in comp.lang.perl.misc:
> >Hi, in Perl, how can do excuslive file I/O? That is only one can read and
> >write to a file in the same time?
>
> perldoc -f flock
Note also that AFAIK flock does not work under Windows 9* (it does under
NT).
Cheers,
Philip
------------------------------
Date: Thu, 8 Jul 1999 10:24:13 +0200
From: "Michael Barst" <barst@goethe.de>
Subject: Help needed: script to extract Hyperlink
Message-Id: <7m1n5r$16l$1@newsread.f.de.uu.net>
Hi,
maybe someone can give me a hint.
I try to replace all links to our searchengine with
a new call to another indexer.
---
example:
<a
href="http://www.goethe.de/cgi-bin/wwwwais/af?title=Suchen+in+der+Region+Sub
-Sahara&text=Geben+Sie+bitte+ein+Suchwort+ein:&resulttext=Suchergebnis+zu&no
resulttext=Kein+Suchergebnis+zu"> <img src="../gif/lupe.gif" border=0
WIDTH=24 HEIGHT=12> Suchen</a>
---
I want everything in the link between the < a href =" and </a> but only
where there is a reference to wwwwais.
I tried several times but I alway end up with text from other links (I read
something about greedy/nongreedy searches but
can't seem to be able to implement it.
thanks in advance,
Michael
------------------------------
Date: Thu, 8 Jul 1999 15:26:41 +0800
From: "Gump Xu" <gump_xu@sc.mcel.mot.com>
Subject: Help: how to capture other process's stdin/stdout ?
Message-Id: <7m1jna$2ig$1@schbbs.mot.com>
Hi,
I am writing a Perl program which will start other
shell programs and need to send inputs(stdin) to them and
check their stdout.
I don't know how to do it via Perl. Anyone help me?
thanks,
Gump
------------------------------
Date: Thu, 08 Jul 1999 08:16:24 +0200
From: "Philip 'Yes, that's my address' Newton" <nospam.newton@gmx.net>
Subject: Re: How to format date and year string?
Message-Id: <37844238.F248A803@gmx.net>
elephant wrote:
>
> Martien Verbruggen writes ..
> >PS. You have a bug in your code., which will be visible from the year
> >2000 onwards.
>
> don't think he does (from his post)
>
> #--snip
> $year += "1900";
> $REAL_DATE="$year$sep$month$sep$day";
> #--pins
Notice this is in a section separated with "and in your case, add",
implying that he normally does *not* add 1900 before printing out the
year. This will give him "01/01/101" for the first day of the 21st
century. He needs to say $year % 100 if he really only wants two digits.
Cheers,
Philip
------------------------------
Date: Thu, 8 Jul 1999 16:52:01 +1000
From: e-lephant@b-igpond.com (elephant)
Subject: Re: How to format date and year string?
Message-Id: <MPG.11eef59f7ea57c32989b1c@news-server>
Philip 'Yes, that's my address' Newton writes ..
>Notice this is in a section separated with "and in your case, add",
>implying that he normally does *not* add 1900 before printing out the
>year. This will give him "01/01/101" for the first day of the 21st
>century. He needs to say $year % 100 if he really only wants two digits.
ahh .. gotcha
--
jason - remove all hyphens for email reply -
------------------------------
Date: 8 Jul 1999 09:29:38 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: How to format date and year string?
Message-Id: <37846172@newsread3.dircon.co.uk>
joeyandsherry@mindspring.com wrote:
> Here's what I'd use:
>
> if ($sec < 10) { $sec = "0$sec"; }
> if ($min < 10) { $min = "0$min"; }
> if ($hour < 10) { $hour = "0$hour"; }
>
Sorry? what *you'd* use? - it look like something straight out of a script
from Matts Script Archive - dont do that use sprintf.
/J\
--
"While we've been on the air we've had reports that Prince Charles has
eaten beef on the bone" - Justin Webb, BBC One O'Clock News
------------------------------
Date: Thu, 8 Jul 1999 15:45:28 +0800
From: "MyName" <abc@abc.com>
Subject: How to open text file for reading from Sever side?
Message-Id: <37845613.0@news.cyberway.com.sg>
my text file is in the same directory of my perl script.
but when I try to open the text file for reading by :
open (INFILE, "myfile.txt");
it does not work. The error seem to be, Perl cannot locate the text file.
What can be the problem?
Pls advice.
Thanks
------------------------------
Date: Thu, 08 Jul 1999 01:32:07 -0400
From: "Ethan H. Poole" <ehpoole@ingress.com>
Subject: Re: I need to hide the source
Message-Id: <378437D7.B6AB8462@ingress.com>
rdosser@my-deja.com wrote:
>
> Thanks for your prompt response.
>
> I know about perl and UNIX permissions, thanks. That's why I asked about
> binary encapsulation.
>
> I need to hide a decryption algorithm for confidential data. That's
> probably not in the FAQ.
How is 'hiding' a decryption algorithm going to increase your security
any? Even if you did develop a brand new super-duper
encryption/decryption algorithm of your very own, hiding it would not
significantly improve the security of your data (you're only obscuring
it). The only way you can protect your data is to protect the key, and if
you are using anything less than public key encryption that means
asbolutely - positively - not embedding the passphrase (aka 'password') in
your program *period*.
Sounds like a case of poor design to me. All you can do in that case is
write such sloppy code that nobody could ever make sense of it.... but
that's ok, if the data is at all interesting we'll bypass your program
anyhow to get to it.
Maybe it's time to hire a consultant who actually *has* a backgound in
security to advise you on how to protect your confidential data?
Seriously, I'm not poking fun at you, but if the information truly is
confidential and you fail to provide reasonably adequate protections for
it you're looking at the possibility of litigation -- or in the case of
trade secrets, lost revenues when the competition gets their hands on the
info.
--
Ethan H. Poole **** BUSINESS ****
ehpoole@ingress.com ==Interact2Day, Inc.==
(personal) http://www.interact2day.com/
------------------------------
Date: Thu, 08 Jul 1999 08:27:50 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Is PERL the way to create a pop-up window ?
Message-Id: <378a5fed.5307128@news.skynet.be>
Jordan Hiller wrote:
>They are usually doing it with JavaScript. JavaScript pretty well is THE ONLY
>answer (although you could investigate VBScript and Java)...Perl is probably
Oops! Interrupted.
Anyway: these dumb popup windows are one of the reasons why people turn
of JavaScript.
Please don't do it. Use a user-friendly banner, if you must. Prefereably
a non-flickering one, because that annoys the shit out of me. I guess
I'm not alone.
Bart.
------------------------------
Date: Thu, 8 Jul 1999 01:13:01 -0400
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Modifying a variable inside a sub
Message-Id: <1dulm0f.hj639lsihd8gN@p86.block2.tc1.state.ma.tiac.com>
Gary O'Keefe <gary@onegoodidea.com> wrote:
> #!/usr/local/bin/perl -w # <- check it out
>
> use strict; # <- check this out too
>
> my $apple = 'red';
>
> print ( "$apple\n" );
> emptyIt ( \$apple ); # create a reference to the scalar
> print ( "$apple\n" );
>
> sub emptyIt {
>
> my $ref = shift;
> ${ $ref } = 'blue'; # dereference and assign
>
> }
Or, skip the references entirely.
#!/usr/local/bin/perl -w
use strict; #
my $apple = 'red';
print ( "$apple\n" );
emptyIt ( $apple );
print ( "$apple\n" );
sub emptyIt {
$_[0] = 'blue';
}
The elements in @_ are aliased to the actual arguments from the
subroutine call.
--
_ / ' _ / - aka -
( /)//)//)(//)/( Ronald J Kimball rjk@linguist.dartmouth.edu
/ http://www.tiac.net/users/chipmunk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Thu, 08 Jul 1999 07:17:24 GMT
From: backwards.saerdna@srm.hc (Andreas Fehr)
Subject: Re: My last hope
Message-Id: <37844494.3926646@news.uniplus.ch>
On Wed, 7 Jul 1999 13:22:05 -0700, lr@hpl.hp.com (Larry Rosler) wrote:
>[Posted and a courtesy copy mailed. Reordered to be readable top to
>bottom.]
>
>In article <37839977.BB01CE59@email.com> on Wed, 07 Jul 1999 18:16:22
>GMT, Jordan Hiller <hiller@email.com> says...
>> Andreas Fehr wrote:
>...
>> > On some systems there is a environment variable (as we call them on
>> > DOS) TZ=MET-1DST
>>
>> How do you decipher this?
>>
>> Is it:
>> "-1" = GMT -1 hours
>> "DST" = uses Daylight Savings Time
>>
>> And what is MET?
>
>'-1' means one hour ahead of UTC, which is opposite to the usual time
>convention UTC+0100. Thus it designates Central European time.
>
>'DST' is incorrect. It should be the name of the particular timezone
>for Summer Time (always assumed to be one hour ahead of the designated
>offset from UTC).
>
>'MET' is an error also. The proper timezone designations I know of for
>the UTC+0100 timezone are:
>
>CET-1CEST Central Europe
>MEZ-1MESZ Germany
>WAT-1WAST Western Africa
>
><URL:http://www.hpl.hp.com/counters/tzone.txt> has what I believe is a
>reasonably correct and perhaps useful list of all of these things.
>
Thanks for your information. I've got my information from my pgp
installation document.
The information may be outdated (but it works). The documents you
provided, talks about MET and DST, too. This is probably the old
style.
Andreas
------------------------------
Date: Thu, 08 Jul 1999 08:07:02 +0200
From: "Philip 'Yes, that's my address' Newton" <nospam.newton@gmx.net>
Subject: Re: Newbie: Get all directories in a directory:
Message-Id: <37844006.A30EFAAA@gmx.net>
Rory C-L wrote:
>
> I'm trying to get the full pathnames of a set of nested directories.
> I want the full pathname of each directory if possible.
You may wish to look into the File::Find standard module, which saves
you from having to do the recursion yourself (and filters out '.' and
'..' for you where those exists). The full pathname of each directory is
in $File::Find::name. You are chdir'ed to each directory when your
subroutine is called and the basename of the file is in $_, so test are
as easy as if(-d) {...}. File::Find is really quite useful.
Cheers,
Philip
------------------------------
Date: Thu, 08 Jul 1999 18:09:16 +1000
From: Kevin Powe <kevinp@COMPANY.com>
Subject: Perl Debugger recommendation sought
Message-Id: <37845CAC.9CAD5A6C@COMPANY.com>
'lo all.
I'm looking for a debugger for messing with Perl currently, and I was
wondering if someone could recommend something for the PC. A GUI
debugger would be preferred, but if not that, then a stable command line
GUI would be a good second-best.
I've had a look at the ActiveState Perl Debugger, but I couldn't drill
down through objects with enough ease for it to be suitable. I need
something that can deal with objects easily, allows the setting of
breakpoints in multiple files for execution, and allows watching on the
contents of structures as well.
Thanks in advance!
--
****************************************************
Kevin Powe Mincom Software Engineer
"When you reach an impasse,
adapt and you will go through"
****************************************************
If these were Mincom's opinions, they'd make more
sense. To reply to me directly, guess who I work
for. (your time starts... NOW!)
****************************************************
------------------------------
Date: Thu, 8 Jul 1999 01:13:02 -0400
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Subroutines in a package
Message-Id: <1duln1v.1topsc5q8of6N@p86.block2.tc1.state.ma.tiac.com>
James A. Duncan <j@mesduncan.co.uk> wrote:
> Marcel wrote in message <3784244f.2993854@enews.newsguy.com>...
> >pmtools are at http://language.perl.com/misc/pmtools-1.00.tar.gz
>
> I've already gone down that route. I'm looking for a method to get the
> subnames without actually having to open a file and parse the text. But
> thanks for the pointer, if all else fails....
In that case, could you be more specific about what you had in mind?
Obviously, the file must be opened and parsed in some manner in order to
get the subroutine names.
--
_ / ' _ / - aka -
( /)//)//)(//)/( Ronald J Kimball rjk@linguist.dartmouth.edu
/ http://www.tiac.net/users/chipmunk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Thu, 8 Jul 1999 00:15:52 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Summing Array to Hash elements
Message-Id: <MPG.11edefe4ac91f10a989c73@nntp.hpl.hp.com>
In article <u4sjg0w8o.fsf@prodigy.net> on 07 Jul 1999 21:24:23 -0400,
RABM@prodigy.net <RABM@prodigy.net> says...
...
> my %word;
> while( <DATA> =~ m/(.+)/g) {
> $word{$1}++;
> }
That is a very strange way to do, in essence, chomp(). And I don't know
why the '/g' is there. How many times can that regex match on one line,
anyhow?
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 8 Jul 1999 05:37:04 GMT
From: efflandt@xnet.com (David Efflandt)
Subject: Re: UPS shipping code???
Message-Id: <slrn7o8e3c.hu.efflandt@efflandt.xnet.com>
On Wed, 7 Jul 1999 09:24:24 -0700, Jeremiah and Veronica Adams
<adams1015@worldnet.att.net> wrote:
>Does anyone know where I can find code that can accesss up shipping costs by
>weight and zip code?
Have you considered checking out http://www.ups.com/ ?
They used to have a perl script on their site but I am not sure where to
find it. They do have some internet tools (MS Word files and html
examples) you can download and look through.
--
David Efflandt efflandt@xnet.com http://www.xnet.com/~efflandt/
http://www.de-srv.com/ http://cgi-help.virtualave.net/
------------------------------
Date: 8 Jul 1999 05:39:12 GMT
From: Tom Mornini <tmornini@netcom9.netcom.com>
Subject: Re: UPS shipping code???
Message-Id: <7m1di0$qd4@dfw-ixnews21.ix.netcom.com>
Matthew Bafford <*@dragons.duesouth.net> wrote:
: Jeremiah and Veronica Adams" <adams1015@worldnet.att.net>, thinking with
: his hands, posted the following to comp.lang.perl.misc:
: : Does anyone know where I can find code that can accesss up shipping costs by
: : weight and zip code?
: http://www.ups.com
: If you wish to automate it, look into the LWP module.
Oh hell, why do it yourself?
http://your_CPAN_server/modules/by-module/Business/Business-UPS-1.13.readme
-- Tom Mornini
-- InfoMania
------------------------------
Date: 8 Jul 1999 00:07:09 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Webpages and Perl-Couple of Questions
Message-Id: <slrn7o8cf6.ued.abigail@alexandra.delanet.com>
Uri Guttman (uri@sysarch.com) wrote on MMCXXXVII September MCMXCIII in
<URL:news:x7hfnfu70t.fsf@home.sysarch.com>:
%% >>>>> "A" == Abigail <abigail@delanet.com> writes:
%%
%% A> Been There, Done That, Did Not Get The T-Shirt.
%%
%% well, i don't think i have ever seen that exact full phrase before so
%% the abbrev. was totally out of the blue. is it a common term like
%% TIMTOWTDI?
Far more common.
Abigail
--
perl5.004 -wMMath::BigInt -e'$^V=Math::BigInt->new(qq]$^F$^W783$[$%9889$^F47]
.qq]$|88768$^W596577669$%$^W5$^F3364$[$^W$^F$|838747$[8889739$%$|$^F673$%$^W]
.qq]98$^F76777$=56]);$^U=substr($]=>$|=>5)*(q.25..($^W=@^V))=>do{print+chr$^V
%$^U;$^V/=$^U}while$^V!=$^W'
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including Dedicated Binaries Servers ==-----
------------------------------
Date: Thu, 08 Jul 1999 08:00:57 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Webpages and Perl-Couple of Questions
Message-Id: <37865a75.3907584@news.skynet.be>
Uri Guttman wrote:
> A> Been There, Done That, Did Not Get The T-Shirt.
>
>well, i don't think i have ever seen that exact full phrase before so
>the abbrev. was totally out of the blue. is it a common term like
>TIMTOWTDI?
I thought the "common" expression was "Been There, Done That, Got The
T-Shirt". But, what do I know. I'm not American.
Bart.
------------------------------
Date: Thu, 8 Jul 1999 01:13:04 -0400
From: rjk@linguist.dartmouth.edu (Ronald J Kimball)
Subject: Re: Weird /x regexps
Message-Id: <1dulna6.e9dorubhkngxN@p86.block2.tc1.state.ma.tiac.com>
Jordan Hiller <hiller@email.com> wrote:
> Well, I found the problem, but it sure is strange. Apparently Perl didn't like
> me using brackets in my comments. But why would that be a problem? They're
> COMMENTS, to be IGNORED, aren't they?
>
They're only comments if the regex operator ends with /x. Perl has to
find the end of the regex operator before it knows to ignore the
comments. Thus, comments with /x cannot include the delimiter
character.
--
_ / ' _ / - aka -
( /)//)//)(//)/( Ronald J Kimball rjk@linguist.dartmouth.edu
/ http://www.tiac.net/users/chipmunk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
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 V9 Issue 74
************************************
