[6423] in Perl-Users-Digest
Perl-Users Digest, Issue: 48 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Mar 4 14:48:37 1997
Date: Tue, 4 Mar 97 11:00:29 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 4 Mar 1997 Volume: 8 Number: 48
Today's topics:
Re: @hash{@fields} = @values; (Honza Pazdziora)
Re: Can't run Perl from Win95 DOS command prompt? <jwilson@ic.ac.uk>
Re: College Students need help with perl script (1/1) (Jon Bell)
Re: for god sake <tchrist@mox.perl.com>
Re: for god sake (Markus Laker)
Re: Graphical Perl for Win32 lvirden@cas.org
Re: HELP: Is there some standard code to filter out htm (Tad McClellan)
Re: How to spam - legitimately (Dylan Northrup)
Re: How to spam - legitimately (Ronald L. Parker)
Initializing array contents to all zeros really_eliot@dg-rtp.dg.com_but_mangled_to_stop_junk_email
Open2 solution and thanks (Diana McCarthy)
Re: passing hidden input from cgi to perl script <nachtigall@edcserver1.cr.usgs.gov>
Perl 5.003, VI, and Toshiba T1000SE <jlowens@ptconnect.infi.net>
Re: Problem with LEARNING PERL Example (Tad McClellan)
Re: Problem with LEARNING PERL Example <eike.grote@theo.phy.uni-bayreuth.de>
Re: Public domain DES and other crypto code in Perl? (Paul Rubin)
Q: how to utilize packages as independent script? (Kenneth W. Lee)
Re: seek and tell <tchrist@mox.perl.com>
Re: Tap, tap, anyone here ? (Matthew D. Healy)
Re: Tap, tap, anyone here ? (Matthew D. Healy)
The importance of using good keys (Christopher Masto)
Re: Timer which can handle milliseconds.. (Matthew D. Healy)
Re: Web download script..???? <wade@demographics.com>
Re: What's wrong with this Perl? (Ronald L. Parker)
Re: Where is FAQ? (Abigail)
Re: Where is FAQ? (John Stanley)
Digest Administrivia (Last modified: 8 Jan 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 4 Mar 1997 16:09:30 GMT
From: adelton@fi.muni.cz (Honza Pazdziora)
Subject: Re: @hash{@fields} = @values;
Message-Id: <adelton.857491770@aisa.fi.muni.cz>
Ken Stevens <kstevens@theglobeandmail.com> writes:
> Say, I've always wondered about this one. Why does the following work?
>
> @fields = ('a', 'b', 'c');
> @values = (4, 7, 9);
> @hash{@fields} = @values;
> print $hash{'b'}; # will print "7"
>
> I've read all the perl docs, and I can't find any reference to this very
> useful syntax. Is this an undocumented goodie?
It's mentioned in the perldata man page, which says
@days{'a','c'} # same as ($days{'a'},$days{'c'})
So the example above means
($hash{$fields[0]}, $hash{$fields[0], $hash{$fields[2]}) = @values;
and you can assign list to list.
Hope this is correct explanation.
--
------------------------------------------------------------------------
Honza Pazdziora | adelton@fi.muni.cz | http://www.fi.muni.cz/~adelton/
I can take or leave it if I please
------------------------------------------------------------------------
------------------------------
Date: 4 Mar 1997 12:05:11 GMT
From: "Jeff Wilson" <jwilson@ic.ac.uk>
Subject: Re: Can't run Perl from Win95 DOS command prompt?
Message-Id: <01bc2894$4f927380$1d34c69b@leicester.cc.ic.ac.uk>
I think you should be using the DOS wrapper (pl2bat.bat) for your Perl
scripts. From DOS window, i.e., ....
pl2bat.bat your_script.pl
your_script.bat
... should work.
--
Jeff Wilson
CCS ~ Imperial College ~
London UK
Fred Elbel <__felbel@csn.net__> wrote in article
<331ba72f.24354397@news-2.csn.net>...
> I have installed Perl under Win95.
> The version is ActiveWare Perl 5.03 for Windows95 (Win32)
> (Build 302 - Dec. 13, 1996).
>
> When I try to run from a DOS command prompt line (a DOS window), the
> response is "This program can not be run in DOS mode.". According to
> several posts, and section 1.14 of Evangelo Prodromou's FAQ, Perl
> should run OK from the command line.
>
> I *can* run Perl from explorer by clicking on a Perl source file (and
> I can compile from within my MultiEdit editor). So I do think Perl
is
> installed completely and correctly, and I have reinstalled a few
> times.
>
> So am I missing a major concept here, or is there perhaps a registry
> setting that got hozed? Thanks much for any and all help!
>
>
> -- Fred Elbel felbel@csn.net
>
------------------------------
Date: Tue, 4 Mar 1997 16:57:56 GMT
From: jtbell@presby.edu (Jon Bell)
Subject: Re: College Students need help with perl script (1/1)
Message-Id: <E6J34L.D2G@presby.edu>
<Bozo@Chicago.land> wrote:
>
>begin 644 makepage-pl.html
>M/$A434P^#0H\2$5!1#X\5$E43$4^;6%K97!A9V4N<&P\+U1)5$Q%/CPO2$5!
>M1#X-"CQ"3T19/@T*/%A-4#X-"B,A+W5S<B]L;V-A;"]B:6XO<&5R;`T*#0HC
[snip]
Uh... HTML code and Perl code are both plain ASCII text. Why encode
them? Lots of people (like me) use newsreaders that don't decode
automatically.
--
Jon Bell <jtbell@presby.edu> Presbyterian College
Dept. of Physics and Computer Science Clinton, South Carolina USA
[for beginner's Usenet info, see http://web.presby.edu/~jtbell/usenet/ ]
------------------------------
Date: 4 Mar 1997 16:28:42 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: for god sake
Message-Id: <5fhijq$anf$2@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
mlaker@contax.co.uk (Markus Laker) writes:
:opendir DIR, 'c:\\' or die "Can't open the directory:\n$!\n";
:print join "\n", readdir DIR;
:
:then Perl returns 'No such file or directory'. However, if I change
:the directory from 'c:\\' to 'c:\\.' then I get a directory listing,
:as you'd expect.
Is there a difference between "C:/" and "C:/." ?
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
I'm a programmer: I don't buy software, I write it.
--Tom Christiansen
------------------------------
Date: Tue, 04 Mar 1997 16:52:07 GMT
From: mlaker@contax.co.uk (Markus Laker)
Subject: Re: for god sake
Message-Id: <5fhk2f$jv4$1@newsserver.dircon.co.uk>
In a message that hasn't yet reached my newsfeed, Tom Christiansen
writes:
> Is there a difference between "C:/" and "C:/." ?
Yes, there is. 'C:/' fails in the same way as 'C:\\' but 'C:/.'
works properly.
Incidentally, people with as much clout as Tom C should perhaps avoid
sending mail with subjects like 'For god's sake'. I thought I'd made
a *major* cock-up when that arrived. :-) Other than that, the mailed
copy is appreciated.
Markus Laker
------------------------------
Date: 4 Mar 1997 10:18:55 GMT
From: lvirden@cas.org
Subject: Re: Graphical Perl for Win32
Message-Id: <5fgsuf$1d5@srv13s4.cas.org>
Once the Perl / Tk module is upgraded to support Tk 8.x, folk should be
able to write native look and feel GUI applications in perl on Win32.
The programs will be oriented towards the Tk module of course. But,
if a particular W95/WNT widget isn't supported, there should be a
framework to add it with enough work.
--
Larry W. Virden INET: lvirden@cas.org
<URL:http://www.teraform.com/%7Elvirden/> <*> O- "We are all Kosh."
Unless explicitly stated to the contrary, nothing in this posting should
be construed as representing my employer's opinions.
------------------------------
Date: Tue, 4 Mar 1997 10:45:30 -0600
From: tadmc@flash.net (Tad McClellan)
Subject: Re: HELP: Is there some standard code to filter out html tags.
Message-Id: <ajjhf5.ft1.ln@localhost>
Jim Anderson (jander@ml.com) wrote:
: Frank Meissner <meissner@wattenmeer.pixelpark.com> writes:
: > mark@weymouth.gov.uk (Mark Perkins) writes:
: >
: > >
: > > Hi,
: > >
: > > Well from the subject you can probably tell that Im new to Perl
: > > although I have a reasonable understanding of unix shell.
: > >
: > > Q. Is there some standard Perl code that I can use to filter out the
: > > html tags like, <CENTER> or <B> from text held in a perl variable?
: > perhaps something like
: > $_=$VarWhereYourHtmlSourceIs;
: > s/<[^>]+>//g;
: I think this needs "minimal matching":
^^^^^^^^^^
How come?
: s/<[^>]+?>//g;
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: 4 Mar 1997 14:44:28 GMT
From: northrup@chem.ufl.edu (Dylan Northrup)
Subject: Re: How to spam - legitimately
Message-Id: <5fhcgc$8se@nostromo.clas.ufl.edu>
An infinite number of monkeys in the guise of Randal Schwartz <merlyn@stonehenge.com> wrote:
=:>>>>> "Terry" == Terry Carroll <carroll@tjc.com> writes:
=:
=:Terry> The example you're trying to give here is not of the same type. "An
=:Terry> email" fills a gap in the English language. It provides a noun for a
=:Terry> concept that otherwise wouldn't have one.
=:
=:Funny, I find "some email" or "a piece of email" to be satisfactory.
=:"an email" sounds strange. Very strange. To my native ears.
=:
=:That's because I hear "email" as derived from "mail". I've heard
=:"some mail" and "a piece of mail", but never "a mail". Ugh. A native
=:speaker of American english would *never* say that.
Well, I may not be the best at pedantically following the rules (written or
unwritten) of my native language but this is something that I've said many a
time.
Examples from my everyday life:
"Just let me send an email to Bob telling him where we're going for lunch
and we'll leave."
"If I don't get an email from you about your problem I'll forget to look
into it."
"I've been too busy to get out an email to Joe about that."
Now, I will sometimes s/email/email message/g in my everyday speech, however
this is optional. I guess this means I go both ways on this, eh?
Oh, and as for my native qualifications, I was born and raised in Florida
(yes, a Native Floridian. They actually do exist!). While most people's
speech in the South are leisurely in their application of the rules of
grammar, that doesn't negate our positions as native speakers :-)
--
Dylan Northrup <*> northrup@pobox.com <*> http://pobox.com/~northrup <*>
Ask me about e-mail P.O. Boxes <*> "I don't want the world, just your half"
---------------
Random B5 Quote
---------------
"C'mon, Ivanova, this is me."
'Yes, it is and you're so cute when you're worried about
investigating someone close to you."
-- Garibaldi and Ivanova, "A Race Through Dark Places"
------------------------------
Date: Tue, 04 Mar 1997 17:12:35 GMT
From: ron@farmworks.com (Ronald L. Parker)
Subject: Re: How to spam - legitimately
Message-Id: <331c5777.14441053@10.0.2.33>
On Mon, 24 Feb 1997 21:38:31 GMT, DeathToSpam@dev.null.com (Lee)
wrote:
>Unlike many other languages English is extremely dynamic and growing
>at a radical rate. Presently it is the largest language in size of
>all known languages in the world...over 1 million words.
>
Presently, as in "momentarily?"
Surely you meant "Presently, it will be..." or "At present, it is..."
(Sorry, just my little corner of the ongoing rant about the
deterioration of what was once a fine language.)
------------------------------
Date: 04 Mar 1997 13:02:04 -0500
From: really_eliot@dg-rtp.dg.com_but_mangled_to_stop_junk_email
Subject: Initializing array contents to all zeros
Message-Id: <bvd8tfwn6r.fsf@remus.i-have-a-misconfigured-system-so-shoot-me>
I need to create a lot of arrays and initialize their elements to zero.
I want to initialized them explicitly because I may well read various
elements before writing them, and perl -w burps out many screenfuls of
warnings about using uninitialized values.
Since I generally create several arrays of the same size at the same time,
I have written a routine that takes one size parameter, and references
to one or more arrays. It is:
sub InitializeArrays {
my $size = shift @_;
my $firstarray = shift @_;
my $otherarray;
$#$firstarray = $size - 1;
foreach $index (0 .. ($size - 1)) {
$firstarray -> [$index] = 0;
}
foreach $otherarray (@_) {
$#$otherarray = $size - 1;
@$otherarray = @$firstarray;
}
}
I kept thinking that surely there would be a slicker way of doing this,
but I can't come up with one. Any suggestions?
Please note that my email address is mangled in the header.
Topher Eliot Data General Unix Core Development
(919) 248-6371 eliot at dg-rtp.dg.com
Obviously, I speak for myself, not for DG.
Visit misc.consumers.house archive at http://www.geocities.com/Heartland/7400
"I like to get the chicks messy."
-- Peter, age 4, on why he likes the barnyard-scene cereal bowl.
------------------------------
Date: 4 Mar 1997 10:05:29 GMT
From: dianam@cogs.susx.ac.uk (Diana McCarthy)
Subject: Open2 solution and thanks
Message-Id: <5fgs59$pfj@infa.central.susx.ac.uk>
Summary:
Keywords:
Thanks for the replies to my query concerning open2.
dianam@cogs.susx.ac.uk (Diana McCarthy) writes:
> I want to send and data to and from a process. I understand that IPC::Open2
> should allow me to do that and I believe the command I want to use works just
> like "bc" - i.e. sends and receives a line at a time. I cannot get my code to
> work with "bc" never mind with my command. I think it may be my lack of
> understanding of how to create the file handles before the open2 call. If
> anyone can see what I am doing wrong I would be very grateful for any
> guidance. My code and program output is given below:
>
> #!/local/perl5/bin/perl
> use IPC::Open2;
> $pid = open2(\*IN, \*OUT, "bc");
>
> print IN "5";
> @result = <OUT>;
> print "the result is @result\n";
> close(OUT);
> close(IN);
>
> When I run this I get:
> "the result is"
There were a combination of three problems in my original problem that Honza
Pazdziora kindly pointed out.
1) I had forgotten to terminate the input to bc with a newline.
2) because the output of the program might be buffered I needed to close the
output filehandle before reading the result from the input filehandle.
3) finally I had the input and output filehandles the wrong way round.
I didn't really want to close the output filehandle before reading the result
becase my reason for using open2 was so that I could send and recieve data to
and from the program (lets call it programx instead of bc) many times without
having to repeatedly start it up. I was sent a patch for the program I was
pipeing to that ensured line-by-line buffering. This meant I could use open2
to read and write to and from a program without having to keep closing the
output filehandle for fear of a dealock. Code Follows:
#!/usr/local/bin/perl -w
# test for programx's line buffering
use FileHandle;
use IPC::Open2;
$pid = open2( \*Reader,\*Writer,"./programx");
# autoflush flushes the output buffer
Writer->autoflush();
while(<>) {
print Writer "$_";
$got = <Reader>;
print $got;
}
Many thanks for the help
Diana
------------------------------
Date: Tue, 4 Mar 1997 18:12:54 GMT
From: Neal Nachtigall <nachtigall@edcserver1.cr.usgs.gov>
To: futurecard@netstorage.com
Subject: Re: passing hidden input from cgi to perl script
Message-Id: <331C6626.81F@edcserver1.cr.usgs.gov>
John Cervini wrote:
>
> I want to pass the date to a perl script. I thought about doing it like
> this:
> (html cgi form)
> <input type="hidden" name="date" value="$today">
>
> Of course I would declare the variable $today=`/bin/date +%m/%d/%Y`
> in the perl. This does not work. I get the literal "$today" as a
> result.
> What is the proper way to do this using the 'hidden' input.
Huh????
Not sure what you are getting at, but the fact that date is a hidden
html field has nothing to do with your problem and if you are
manually generating the html form then whatever you type in as a
value will be exactly what is passed.
If you want to generate a value for a field in an html form you should
generate the entire form from a cgi script. Such as:
FirstCGIScript generates the form:
print<<HTML;
print"action=SecondCGIScript\n"; #you get the point
print"blah blah blah\n";
HTML;
chomp($today = `/bin/date +%m/%d/%Y`);
print "<input type=\"hidden\" name=\"date\" value=\"$today\">\n";
Form would contain:
blah blah blah
<input type="hidden" name="date" value="03/04/1997">
SecondCGIScript:
$today = $form_fields{'date'}; #also known as 'in'
HTH,
--
Neal L. Nachtigall * nealnach@dlgef.cr.usgs.gov
Hughes STX (EROS Data Center)
No wonder nobody comes here--it's too crowded. -Yogi Berra
------------------------------
Date: Tue, 04 Mar 1997 08:45:12 -0800
From: "Jack L. Owens" <jlowens@ptconnect.infi.net>
Subject: Perl 5.003, VI, and Toshiba T1000SE
Message-Id: <331C5198.69619B17@ptconnect.infi.net>
Someone gave me a Toshiba T1000SE along with all of the manuals and
documentation. I have been able to avoid laptops to this point but FREE
is FREE. Admittedly, this is a very limited machine, but should be
suitable for taking along on short two or three day trips. Does anyone
one know what and where compact DOS 3.30 programs for PERL or VI might
be obtained?
--
Jack L. Owens General Engineering Contractor
Long Beach, California 90807 K6PWY
(562)989-9413 jowens@csulb.edu
------------------------------
Date: Tue, 4 Mar 1997 10:50:24 -0600
From: tadmc@flash.net (Tad McClellan)
Subject: Re: Problem with LEARNING PERL Example
Message-Id: <gsjhf5.ft1.ln@localhost>
David Dickerson (ddickerson@igc.apc.org) wrote:
: Greetings!
: I am currently reading the first edition of LEARNING PERL and working
: my way through the examples. I seem to be stumped, however, by the
: example on page 10, which introduces arrays. (I should mention that
: I am using the latest Macintosh port of Perl 5, MacPerl 5.1.3.r2.)
: I have compared my code to the code in the book and cannot find what
: obviously must be a mistake in my code, which is as follows.
: --------------------------------------------------------------------------
: #!/usr/bin/perl
: @words = ("camel","llama","oyster");
: print "What is your name? ";
: $name = <STDIN>;
: chop($name);
: if ($name eq "Randal") {
: print "Hello, Randal! How good of you to be here!\n";
: } else {
: print "Hello, $name!\n"; # ordinary greeting
: print "What is the secret word? ";
: $guess = <STDIN>;
: chop($guess);
: $i = 0; # try this word first
: $correct = "maybe"; # is the guess correct or not?
: while ($correct eq "maybe") { # keep checking until we know
: if ($words[$i] eq $guess { # right?
^^
missing parens:
if ($words[$i] eq $guess) { # right?
^
^
: When I attempt to run the script or check its syntax, I get the following
: errors:
: # syntax error, near "}"
: File secret-word-2.pl'; Line 19
: # syntax error, near "} else"
: File Line 21
: # Execution of secret-word-2.pl aborted due to compilation errors.
--
Tad McClellan SGML Consulting
Tag And Document Consulting Perl programming
tadmc@flash.net
------------------------------
Date: Tue, 04 Mar 1997 18:26:14 +0100
From: Eike Grote <eike.grote@theo.phy.uni-bayreuth.de>
Subject: Re: Problem with LEARNING PERL Example
Message-Id: <331C5B35.41C6@theo.phy.uni-bayreuth.de>
Hi,
David Dickerson wrote:
>
> Greetings!
>
> I have compared my code to the code in the book and cannot find what
> obviously must be a mistake in my code, which is as follows.
Take a careful look again ...
It's just a ')' you missed:
> #!/usr/bin/perl
>
> @words = ("camel","llama","oyster");
> print "What is your name? ";
> $name = <STDIN>;
> chop($name);
> if ($name eq "Randal") {
> print "Hello, Randal! How good of you to be here!\n";
> } else {
> print "Hello, $name!\n"; # ordinary greeting
> print "What is the secret word? ";
> $guess = <STDIN>;
> chop($guess);
> $i = 0; # try this word first
> $correct = "maybe"; # is the guess correct or not?
> while ($correct eq "maybe") { # keep checking until we know
> if ($words[$i] eq $guess { # right?
^
here's the problem -----------------/
[...]
Bye, Eike
=====================================================================
Eike Grote, Theoretical Physics IV, University of Bayreuth, Germany
email : eike.grote@theo.phy.uni-bayreuth.de
URL : http://www.phy.uni-bayreuth.de/~btpa25/
=====================================================================
------------------------------
Date: Tue, 4 Mar 1997 17:51:39 GMT
From: phr@netcom.com (Paul Rubin)
Subject: Re: Public domain DES and other crypto code in Perl?
Message-Id: <phrE6J5M3.5Dz@netcom.com>
In article <5fh0sm$lrc$2@korai.cygnus.co.uk>,
Andrew Haley <aph@cygnus.co.uk> wrote:
>: Huh? What's wrong with the user compiling the C functions in with
>: their programs? DES and other bit twiddling algorithms sound painful
>: in Perl.
>
>Not every user has a C compiler. Besides, if all you're doing is
>encrypting an authenitcation ticket the user won't perceive any
>difference between C and PERL. It shouldn't be hard to translate DES
>from C to PERL.
Not everyone has Perl either though! Personally I think it's time
for a Lisp revival...
------------------------------
Date: 4 Mar 1997 13:34:31 -0500
From: kenlee@congo.morgan.com (Kenneth W. Lee)
Subject: Q: how to utilize packages as independent script?
Message-Id: <kenlee.857499497@congo>
hi,
Running unix xterm under SunOS 4.1.3, perl5.
I've checked the pink camel, the big how-to, and the mans,
but I'm still having trouble using a package as an independent script.
What is the standard technique for executing a package as
a separate script, like so?
Here's a sample package, saved as 'packfile.pl':
---begin package---
#!/usr/local/bin/perl5 -w
package packfile;
sub subpack1 {
print "pack1\n";
}
1;
---end package---
And here's a sample main, saved as 'main.pl':
---begin main---
#!/usr/local/bin/perl5 -w
require "packfile.pl";
{
packfile::subpack1();
}
---end main---
So now I have two files (which I've tested):
packfile.pl
main.pl
Executing main.pl, the following output is returned:
pack1
which is as if should be. Now to my original question:
How do I execute packfile.pl _BY ITSELF_?
My current inability to access packages as separate
scripts makes the extra effort of breaking the logic
into separate files redundant. Perhaps there is a
way to call perl subroutines from the command line?
or a way to code packages to make it accessible by
itself?
Any suggestions/pointers will help a great deal.
Thanks in advance,
--
Ken
--
------------------------------
Date: 4 Mar 1997 17:09:38 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: seek and tell
Message-Id: <5fhl0i$cne$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
bmenke@wasco.synopsys.com (Brian Menke) writes:
:Of course this text just get appended to the end of the file. What
:I really want is to have the new text appended after the <body> tag
:but before "here is some text"
Insertion into a text cannot be done. You must make a temp file.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
Though I'll admit readability suffers slightly...
--Larry Wall in <2969@jato.Jpl.Nasa.Gov>
------------------------------
Date: Tue, 04 Mar 1997 11:29:19 -0500
From: Matthew.Healy@yale.edu (Matthew D. Healy)
Subject: Re: Tap, tap, anyone here ?
Message-Id: <Matthew.Healy-0403971129190001@pudding.med.yale.edu>
In article <01bc23dc$d92b4480$36d880c1@aardvark.3dlabs.com>, "Doug
Bridgens" <doug@3dlabs.com> wrote:
> Hi,
> I'm brand new to perl, just picked up the Llama book yesterday! I need
> to write CGI apps for our intranet (3Dlabs Inc.), unforunately running on
> NT :( The book (Llama book) suggests this news group as a source of
...
For Perl-specific questions, you've come to the right place :-)
For cgi-related matters, the newsgroup is comp.infosystems.authoring.cgi
You might also find some of the following URLs handy:
http://www.endcontsw.com/people/evangelo/Perl_for_Win32_FAQ.html
http://www.perl.com/perl/
http://ycmi.med.yale.edu/~healy/cgilinks.html
And follow the links from these. In particular, you'll probably want
to snarf-up the various FAQs mentioned therein.
Hope this helps.
---------
Matthew.Healy@yale.edu
http://paella.med.yale.edu/~healy
Go and share the Gospel. Use words only if necessary --St Francis
------------------------------
Date: Tue, 04 Mar 1997 11:33:07 -0500
From: Matthew.Healy@yale.edu (Matthew D. Healy)
Subject: Re: Tap, tap, anyone here ?
Message-Id: <Matthew.Healy-0403971133070001@pudding.med.yale.edu>
In article <01bc23dc$d92b4480$36d880c1@aardvark.3dlabs.com>, "Doug
Bridgens" <doug@3dlabs.com> wrote:
Ooops! Made a booboo in my previous posting. It's
comp.infosystems.www.authoring.cgi Sorry about that.
^^^
I posted:
In article <01bc23dc$d92b4480$36d880c1@aardvark.3dlabs.com>, "Doug
Bridgens" <doug@3dlabs.com> wrote:
> Hi,
> I'm brand new to perl, just picked up the Llama book yesterday! I need
> to write CGI apps for our intranet (3Dlabs Inc.), unforunately running on
> NT :( The book (Llama book) suggests this news group as a source of
...
For Perl-specific questions, you've come to the right place :-)
For cgi-related matters, the newsgroup is comp.infosystems.authoring.cgi
^^^^SEE CORRECTION
You might also find some of the following URLs handy:
http://www.endcontsw.com/people/evangelo/Perl_for_Win32_FAQ.html
http://www.perl.com/perl/
http://ycmi.med.yale.edu/~healy/cgilinks.html
And follow the links from these. In particular, you'll probably want
to snarf-up the various FAQs mentioned therein.
Hope this helps.
---------
Matthew.Healy@yale.edu
http://paella.med.yale.edu/~healy
Go and share the Gospel. Use words only if necessary --St Francis
------------------------------
Date: 4 Mar 1997 17:31:54 GMT
From: exidor@nimbus.superior.net (Christopher Masto)
Subject: The importance of using good keys
Message-Id: <5fhmaa$199@news.webspan.net>
Keywords: humor, larry wall, books, database, camel
I don't know if this URL is stateless or not, so if it doesn't work, go
to amazon.com and search for Programming Perl.
http://www.amazon.com/exec/obidos/ats-query/5269-8816872-811285
Click on the link at the bottom to read an interview with "Larry Wall".
I'm not sure if my favorite part is the e-mail address, or
"I get started using the 'Net a few years ago and think it is great."
On this subject though, it's also one of the things that annoys me
with DejaNews. If you happen to see an article tha happens to have a
(lame) subject like "Programming Perl", and click on it in the hopes
of reading that particular thread, you end up with several hundred
unrelated articles.
--
Christopher Masto . . . . NetMonger Communications
chris@masto.com . . . . . Masto Consulting: info@masto.com
------------------------------
Date: Tue, 04 Mar 1997 12:05:38 -0500
From: Matthew.Healy@yale.edu (Matthew D. Healy)
Subject: Re: Timer which can handle milliseconds..
Message-Id: <Matthew.Healy-0403971205380001@pudding.med.yale.edu>
In article <331b2a8b.13446493@skarjeke.ind.mh.se>,
daniel.sundin@engelholm.se (Daniel Sundin) wrote:
> I need to be able to measure short periods of times,
> less than a second. Preferably as small as milliseconds.
>
This kind of thing is _extremely_ platform-dependent. On some
platforms it cannot be done at all, and on others it can be done
with difficulty. On most multiuser platforms, even if it can
be done the results will probably depend a great deal on what
else is running at the same instant.
Which platform are you using?
What are you trying to do? If you are trying to benchmark some
code, the best way by far is to run the code repeatedly a number
of times -- there are some standard modules for this, check CPAN.
---------
Matthew.Healy@yale.edu
http://paella.med.yale.edu/~healy
Go and share the Gospel. Use words only if necessary --St Francis
------------------------------
Date: Tue, 04 Mar 1997 12:15:32 -0500
From: Wade Leftwich <wade@demographics.com>
To: Alex Schajer <schajer@dircon.co.uk>
Subject: Re: Web download script..????
Message-Id: <331C58B4.797E@demographics.com>
Alex Schajer wrote:
>
> Len Wilson wrote:
> >
> > Sebastien (sebast@hrnet.fr) wrote:
>
> > : I just want to know how to make a unix script like cgi to auto download
> > : a given web page.
> >
> > #!/usr/local/bin/perl
> >
> > use LWP::Simple
> >
> > $fetchfile = "http://thesite.dom/thepage.html"
> > $localfile = "/path/temp.html"
> > $bytes = 0
> >
> > $bytes = getstore($fetchfile, $localfile)
> >
> > die "Can't get the page. \n" unless $bytes
> >
> > etc.
> >
>
> Does anybody know how to do EXACTLY that for Perl for NT?
> Our problem is that we are having difficulty installing the libraries
> onto our NT machine,
>
> Thanks
>
> Alex
Aldo Capini has written a module called Win32::Internet -- see
http://www.divinf.it/DADA/PERL/index.sht
I have used it and it works.
>From what I read on the perl-win32-users mailing list, using LWP is a
problem with the current version of Perl for Win32. (5.001 is shipping,
5.003 is in beta.)
Wade Leftwich <wade@demographics.com>
American Demgoraphics / Ithaca NY
------------------------------
Date: Tue, 04 Mar 1997 18:48:17 GMT
From: ron@farmworks.com (Ronald L. Parker)
Subject: Re: What's wrong with this Perl?
Message-Id: <331d6e03.20213206@10.0.2.33>
On 2 Mar 1997 23:35:31 GMT, Tom Christiansen <tchrist@mox.perl.com>
wrote:
> [courtesy cc of this posting sent to cited author via email]
[I could hardly do less]
>In comp.lang.perl.misc,
> tim@dierks.org (Tim Dierks) writes:
>:$#a = 5;
>:foreach $v (@a) {
>: $v = 1;
>:}
>:
>:Emits the error message:
>:Modification of a read-only value attempted at test.pl line 3.
>
>Fixed in the next release. (Tested on 5.003_24, and is fine.)
>
>--tom
>--
> Tom Christiansen tchrist@jhereg.perl.com
>
>
> "It's okay to be wrong temporarily." --Larry Wall
Which leads to something that I've been wondering about (I have too
much time on my hands.)
Does your signature change itself, or did you do this deliberately?
------------------------------
Date: Tue, 4 Mar 1997 17:10:31 GMT
From: abigail@ny.fnx.com (Abigail)
Subject: Re: Where is FAQ?
Message-Id: <E6J3pJ.CE8@nonexistent.com>
On 4 Mar 1997 07:58:18 GMT, John Stanley wrote in comp.lang.perl.misc:
++ In article <5fdmfi$598@fridge-nf0.shore.net>,
++ Nathan V. Patwardhan <nvp@shore.net> wrote:
++ >Usenet is part of the internet.
++
++ Incorrect. USENET is often transported via the Internet, but it is also
++ transported via other networks. USENET access does not imply Internet
++ access, just as USENET access does not imply that one owns an airplane or
++ has a FAX machine.
++
++ >Very well, then: ftp -> ftp.cdrom.com/pub/perl/CPAN/doc/FAQs/FAQ
++
++ Ftp is an Internet protocol. USENET != Internet.
++
++ Why is it such a difficult concept that you might tell someone how to
++ get a FAQ in the same medium that they are asking the question?
True, but people who have Usenet access and no Internet access are
rare. Pointing to an ftp site is at least understandable.
Furthermore, there is ftp-by-mail. I've yet to meet someone who has
Usenet access and no mail access. Maybe someone could set up an
autoreplyer, sending the faq? (faq@perl.org?)
Abigail
------------------------------
Date: 4 Mar 1997 18:48:27 GMT
From: stanley@skyking.OCE.ORST.EDU (John Stanley)
Subject: Re: Where is FAQ?
Message-Id: <5fhqpr$9mn@news.orst.edu>
In article <5fhajh$8ko$3@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> wrote:
>:Could whomever used to post it start doing it again? Please?
>
>Let's not be so accusative; s/whomever/whoever/ :-)
Just as long as you don't accusative me of asking you for a dative.
------------------------------
Date: 8 Jan 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Jan 97)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 48
************************************
