[8933] in Perl-Users-Digest
Perl-Users Digest, Issue: 2551 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun May 10 21:07:34 1998
Date: Sun, 10 May 98 18:00:51 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sun, 10 May 1998 Volume: 8 Number: 2551
Today's topics:
(1) Esperanto: Ivy Kellerman-1 nord@aol.com
(1) Esperanto: Ivy Kellerman-2 nord@aol.com
(1) Esperanto: Ivy Kellerman-3 nord@aol.com
Re: 5.004_04 tests fail on Irix 6.2 <ldl@chpc.utah.edu>
Re: Associative array woes <jgirard@starnetusa.com>
Re: Associative array woes (Mark-Jason Dominus)
Re: Associative array woes <zenin@bawdycaste.org>
Re: Bill Gates should be invited to O'Reilly's "Free So <jread@stevens-tech.edu>
Re: Bill Gates should be invited to O'Reilly's "Free So (Barry O'Neill)
Re: DBM and Split Problem <merlyn@stonehenge.com>
Re: DBM and Split Problem (Mark-Jason Dominus)
Re: Does Perl have a IDE?I don't like command line. <tchrist@mox.perl.com>
Re: Email Authentication (Alex K)
Re: Email Authentication (Mark-Jason Dominus)
Re: Email Authentication (Jim Levie)
Re: Email Authentication (Alex K)
Re: Email Authentication <zenin@bawdycaste.org>
Expressions Using Dates <sjogbal@netconnect.com.au>
How can you break out of a 'while... ' loop in a functi (Stuart Wright)
Re: How can you break out of a 'while... ' loop in a fu <alibby@voicenet.com>
Re: How can you break out of a 'while... ' loop in a fu <webmaster@webmoose.com>
Re: how to ignore new line characters in textarea - in <angst@scrye.com>
Re: I need to delete temp files after 24 hours... (Martien Verbruggen)
Re: is it possible to grab email address from visitor o (Matthew R. Williams)
Local GUI Perl Apps via DHTML <mike@coylesystems.com>
Re: Perl CGI problem... <bentzen_nospam_@post8.tele.dk>
Perl for Win32 *not* in background? mike@hyperreal.org
Re: Perl on Win95? (Martien Verbruggen)
Perl output for a gif image <tonyc@clara.net>
Re: Perl output for a gif image (Hakan Hjelmstrom)
Re: QRe: == vs. eq <due@murray.fordham.edu>
Re: reading a text file w/Perl <sjogbal@netconnect.com.au>
Re: Sender.pm module - Where can one obtain this file? <angst@scrye.com>
Stripping HTML Tags from a file <jasmatt@es.co.nz>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 11 May 1998 00:40:09 GMT
From: nord@aol.com
To: Kent Jones <102252.3271@compuserve.com>
Subject: (1) Esperanto: Ivy Kellerman-1
Message-Id: <6j5hdm$o9j$1@nnrp1.dejanews.com>
Poster's Note:
I am posting the Ivy Kellerman Esperanto text to <soc.culture.esperanto> and
<soc.misc> In order to provide a textbook with some depth for novices
interested in becoming acquainted with Esperanto. I am somewhat of a novice
myself although I did complete the e-mail course with Alan Gould
<alan@agolincs.demon.co.uk> as instructor and also the snail-mail ELNA course
with Catherine L. Schulze as instructor.
The postings will occur on an irregular basis as time and circumstance permit.
Robert E. Nordlander nord@aol.com, nord2@juno.com May 10, 1998
-----------------------------------------------------------------------------
----------------------------------------
A COMPLETE GRAMMAR OF ESPERANTO
-
THE INTERNATIONAL LANGUAGE
By Ivy Kellerman
NEW YORK: BOSTON: CHICAGO
D.C. HEATH AND COMPANY
Revision of 1910 Edition [1931]
-----------------------------------------------------------------------------
--------------- LESSON I
ALPHABET
1. The Esperanto alphabet contains the following letters:
a, b, c, cx, d, e, f, g, gx, h, hx , i, j, jx, k, l, m, n, o,
p, r, s, sx, t, u, ux, v, z.
* Poster's note: The letter x is used here as a substitute for the two
diacritical marks appearing over certain Esperanto letters which cannot
be re-produced here
-----------------------------------------------------------------------------------
Posted by Robert E. Nordlander
nord@aol.com, nord2@juno.com
To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
cc: Kent Jones <102252.3271@compuserve.com>
May 10, 1998
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 11 May 1998 00:44:10 GMT
From: nord@aol.com
To: Kent Jones <102252.3271@compuserve.com>
Subject: (1) Esperanto: Ivy Kellerman-2
Message-Id: <6j5hkq$oj5$1@nnrp1.dejanews.com>
A COMPLETE GRAMMAR OF ESPERANTO
-- THE INTERNATIONAL LANGUAGE --
By Ivy Kellerman
NEW YORK: BOSTON: CHICAGO
D.C. HEATH AND COMPANY
Revision of 1910 Edition [1931]
-----------------------------------------------------------------------------
---------------
LESSON I
VOWELS
2. The vowels of the alphabet are pronounced as follows:
a as in far.
e as a in fate.
i as in machine.
o as in toll, for.
u as in rude, rural.
-----------------------------------------------------------------------------------
Posted by Robert E. Nordlander
nord@aol.com, nord2@juno.com
To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
cc: Kent Jones <102252.3271@compuserve.com>
May 10, 1998
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Mon, 11 May 1998 00:47:24 GMT
From: nord@aol.com
To: Kent Jones <102252.3271@compuserve.com>
Subject: (1) Esperanto: Ivy Kellerman-3
Message-Id: <6j5hqs$oo6$1@nnrp1.dejanews.com>
A COMPLETE GRAMMAR OF ESPERANTO
-- THE INTERNATIONAL LANGUAGE --
By Ivy Kellerman
NEW YORK: BOSTON: CHICAGO
D.C. HEATH AND COMPANY
Revision of 1910 Edition [1931]
-----------------------------------------------------------------------------
---------------
LESSON I
CONSONANTS
3. The consonants b, d, f, h, k, l, m, n, p, t, v, z, are pronounced as in
English.,
and the remaining eleven as follows:
c like ts in hats, tsetse.
cx like ch in chin, much.
g like g in go, big.
gx like g in gem, j in jar.
hx is produced by expelling the breath forcibly, with the throat only
partially open. As in pronouncing German and Scotch ch, Spanish j, Irish gh,
Russian x, Classical Greek x, etc. There are only a few words containing this
consonant.
j like y in yes, beyond.
jx like z in azure, s in visual.
r is slightly trilled or rolled.
s like s in see, basis.
sx like sh in shine, rash, ch in machine.
ux like w or consonantal u. See Diphthongs, 5.
-----------------------------------------------------------------------------------
Posted by Robert E. Nordlander
nord@aol.com, nord2@juno.com
To: alt.usage.english, comp.lang.perl.misc, sci.lang.translation, sci.lang
cc: Kent Jones <102252.3271@compuserve.com>
May 10, 1998
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Sun, 10 May 1998 13:57:28 -0600
From: Lou Langholtz <ldl@chpc.utah.edu>
Subject: Re: 5.004_04 tests fail on Irix 6.2
Message-Id: <355605EC.F74C0161@chpc.utah.edu>
Lou Langholtz wrote:
> I tried building perl 5.004_04 with SGI's cc as well as gnu's gcc.
> Running make tests of perl 5.004_04 under Irix 6.2 fails for lib/posix
> and op/groups with either. To get more specifics I cd'd to ./t and ran
> perl harness. I get the following errors:
>
> op/groups...........FAILED test 2
> Failed 1/2 tests, 50.00% okay
>
> lib/posix...........Confused test output: test 9 answered after test 10
> ok
Problem solved... I was listed as a member of two groups that had the same
group ID. So the groups test thought something was wrong. Everything worked
fine after I removed myself from one of the groups (none of the tests
failed).
------------------------------
Date: Sun, 10 May 1998 15:04:00 -0500
From: Jason <jgirard@starnetusa.com>
To: Mark-Jason Dominus <mjd@op.net>
Subject: Re: Associative array woes
Message-Id: <35560830.1F383E5@starnetusa.com>
Thanks for the quick response. I had already read over the
documentation about Tie and module installs,
but was wondering if there is an easy way to do it _without_ modules.
If I put in a request to have
said module installed @ work, god knows how long it will take the
sysadmin to get around to installing it.
-Jason
Mark-Jason Dominus wrote:
>
> In article <3555DF6C.63EF8D2D@starnetusa.com>,
> Jason <jgirard@starnetusa.com> wrote:
> >I'm creating an associative array and trying to print out the name/value
> >pairs in
> >the exact same order I put them into the hash.
>
> This is a FAQ.
>
> perlfaq4: How can I make my hash remember the order I put
> elements into it?
>
> >I'm not sure what modules my admin has installed, so if possible, please
> >show a way without using modules.
>
> This is *also* a FAQ.
>
> perlfaq8: How do I install a CAPN module?
> How do I keep my own module/library directory?
------------------------------
Date: 10 May 1998 16:53:39 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Associative array woes
Message-Id: <6j544j$khl$1@monet.op.net>
Keywords: carrel Conant enforcible luggage
In article <35560830.1F383E5@starnetusa.com>,
Jason <jgirard@starnetusa.com> wrote:
>If I put in a request to have
>said module installed @ work, god knows how long it will take the
>sysadmin to get around to installing it.
That's why I tried to direct your attention to the part of the FAQ tat
says how to use modules that are not installed.
>> perlfaq8: How do I install a CPAN module?
>> How do I keep my own module/library directory?
------------------------------
Date: 11 May 1998 00:28:20 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: Associative array woes
Message-Id: <894846948.675769@thrush.omix.com>
Jason <jgirard@starnetusa.com> wrote:
: Thanks for the quick response. I had already read over the
: documentation about Tie and module installs,
: but was wondering if there is an easy way to do it _without_ modules.
: If I put in a request to have
: said module installed @ work, god knows how long it will take the
: sysadmin to get around to installing it.
If the module is pure perl and doesn't use autoloaded method files,
you can sometimes get away with including it in your source and
therefor not need to "use" it.
#!/usr/local/bin/perl -w
# use Tie::IxHash
<insert body of Tie::IxHash here>
package main;
your script goes here
I think there is a module to do this for you. <grin>
--
-Zenin
zenin@archive.rhps.org
------------------------------
Date: Sun, 10 May 1998 16:08:06 +0000
From: Jeff Read <jread@stevens-tech.edu>
Subject: Re: Bill Gates should be invited to O'Reilly's "Free Software Summit" (was Re: RMS should be invited to O'Reilly's "Free Software Summit")
Message-Id: <3555D0E6.27A7A998@stevens-tech.edu>
David Kastrup wrote:
> duelbooting? would that be starting both operating systems at the
> same time, let them run 10 paces, and then both try to shoot the
> other, and the survivor continues booting?
I'd like to see that. :) Because it's so slow, WinDoze probably wouldn't
even have a chance to aim. :)
--
----------------------------------------------------------------------
Jeff Read <bitwize@geocities.com>/ http://genpc.home.ml.org
Unix / Linux / Windows Hacker, / Boycott Microsoft!
Anime & Sonic Fan, / Use Linux/GNU!
All Around Nice Guy / Let's keep the Net and the Land FREE!
----------------------------------------------------------------------
------------------------------
Date: Sun, 10 May 1998 23:09:44 +0100
From: boneil@nothanks.cableinet.co.uk (Barry O'Neill)
Subject: Re: Bill Gates should be invited to O'Reilly's "Free Software Summit" (was Re: RMS should be invited to O'Reilly's "Free Software Summit")
Message-Id: <MPG.fc035b0308b327c9897e8@news.cableinet.co.uk>
In article <3555D0E6.27A7A998@stevens-tech.edu>, jread@stevens-tech.edu
says...
> David Kastrup wrote:
>
> > duelbooting? would that be starting both operating systems at the
> > same time, let them run 10 paces, and then both try to shoot the
> > other, and the survivor continues booting?
>
> I'd like to see that. :) Because it's so slow, WinDoze probably wouldn't
> even have a chance to aim. :)
I see something along the lines of Windoze taking two steps, tripping and
shooting itself in the foot on the way down... :)
regards,
Barry
--
"Humour is such a subjective thing, don't you think Mollari?" - Emperor
Cartagia, Babylon 5
------------------------------
Date: Sun, 10 May 1998 20:06:06 GMT
From: Randal Schwartz <merlyn@stonehenge.com>
To: mikeh@minivend.com (Mike Heins)
Subject: Re: DBM and Split Problem
Message-Id: <8cn2cpc2nu.fsf@gadget.cscaper.com>
>>>>> "Mike" == Mike Heins <mikeh@minivend.com> writes:
>> command >output
>> and command 2>&1 >output
Mike> I would quibble with this a bit -- actually what you have there in the
Mike> second case is a noop. You need to reverse them to get the desired effect.
It's NOT a no-op.
Consider this:
(command 2>&1 >output) >OUT 2>ERR
In this case, stderr for command goes to OUT, and stdout goes to output.
Compare that with:
(command >output 2>&1) >OUT 2>ERR
In this case, stderr for command goes to output, as does stdout.
And compare that with:
(command >output) >OUT 2>ERR
In this case, stderr for command goes to ERR, and stdout goes to output.
Clearly not a no-op. Clearly not what you want either, if you're trying
to merge stdout and stderr.
print "Just another Perl hacker," # but not what the media calls "hacker!" :-)
## legal fund: $20,990.69 collected, $186,159.85 spent; just 113 more days
## before I go to *prison* for 90 days; email fund@stonehenge.com for details
--
Name: Randal L. Schwartz / Stonehenge Consulting Services (503)777-0095
Keywords: Perl training, UNIX[tm] consulting, video production, skiing, flying
Email: <merlyn@stonehenge.com> Snail: (Call) PGP-Key: (finger merlyn@teleport.com)
Web: <A HREF="http://www.stonehenge.com/merlyn/">My Home Page!</A>
Quote: "I'm telling you, if I could have five lines in my .sig, I would!" -- me
------------------------------
Date: 10 May 1998 16:52:14 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: DBM and Split Problem
Message-Id: <6j541u$kg3$1@monet.op.net>
Keywords: aperture gilbert Hanukkah implicant
In article <3555eae6.0@news.one.net>, Mike Heins <mikeh@minivend.com> wrote:
>Mark-Jason Dominus <mjd@op.net> wrote:
>> command >output
>> and command 2>&1 >output
>
>I would quibble with this a bit
Yes, thanks. As you pointed out, the redirections are performed left
to right, so I meant to say
command >output 2>&1
rather than
command 2>&1 >output
The first one sends stdout to `output', and then sends stderr to
wherever stdout is going---also to `output'.
The second one sends stderr to wherever stdout is going (probably the
tty) and then sends stdout to `output'.
>actually what you have there in the
>second case is a noop.
Only if stderr and stdout were already going to the same place, which
is not necessarily true.
------------------------------
Date: 11 May 1998 00:24:22 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Does Perl have a IDE?I don't like command line.
Message-Id: <6j5gfm$9v1$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, Greg Bacon <gbacon@cs.uah.edu> writes:
:Parsing Perl is no small problem, and any editor that claims to
:do more than a half-ass job is lying.
As Randal has pointed out, this should highlight differently
foo / 3 ; # / ; # This is function foo, divided by 3
than it would if it had seen this declaration, which of course
might be hidden in a module that got used:
BEGIN { eval "sub foo ()" }
foo / 3 ; # / ; # This is function foo, divided by 3
Until this is taken care of, they all lie.
--tom
--
"You can't have filenames longer than 14 chars.
You can't even think about them!"
--Larry Wall in Configure from the perl distribution
------------------------------
Date: Sun, 10 May 1998 23:09:00 GMT
From: techsoft@abcpages.com (Alex K)
Subject: Re: Email Authentication
Message-Id: <35563375.21604858@news.ica.net>
how about trying to ping the current IP?
On 10 May 1998 18:04:38 GMT, Zenin <zenin@archive.rhps.org> wrote:
>Alex K <techsoft@abcpages.com> wrote:
>: try to use finger command , if it says user name , etc, than you can
>: go ahead and send e-mail to him , otherwise, just skip his/her
>: e-mail..
>
> That won't work in probably 9 out of 10 valid addresses in use
> today.
>
> Once again, the *only* way to validate an email address is to send
> a message to it and hope they respond.
>
>--
>-Zenin
> zenin@archive.rhps.org
------------------------------
Date: 10 May 1998 17:00:50 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Email Authentication
Message-Id: <6j54i2$kji$1@monet.op.net>
Keywords: during haunch holocaust Khartoum
In article <35563375.21604858@news.ica.net>,
Alex K <techsoft@abcpages.com> wrote:
>how about trying to ping the current IP?
You obviously haven't thought this through. That would be OK if you
had read the FAQ, but you obviously haven't done that either.
Typically, an email address is not associated with an IP address, and
there is no way to deduce one. For example
mjd@cis.upenn.edu
is a perfectly valid email address; however there is no such computer
as cis.upenn.edu, and there is no IP address for it.
On the other hand,
yobgorgle@plover.com
is invalid even though plover.com has an IP address and will respond
to pings.
------------------------------
Date: Sun, 10 May 1998 22:21:34 GMT
From: Jim.Levie@dynetics.com (Jim Levie)
Subject: Re: Email Authentication
Message-Id: <35572675.36222469@newstoo.hiwaay.net>
On Sun, 10 May 1998 16:45:15 GMT, techsoft@abcpages.com (Alex K)
wrote:
>try to use finger command , if it says user name , etc, than you can
>go ahead and send e-mail to him , otherwise, just skip his/her
>e-mail..
>
Not a good idea, it wouldn't work at my site as anyhing that would
answer a finger is behind a firewall. With the proliferation of
firewalls there isn't any good way to verify an email address. Even
trying to use sendmail's "VRFY" won't work when if a site uses an
external mail relay that relays everything to an inside mail system.
In those cases any and all email addresses are valid as far as the
external relay machine is concerned.
About all one could do is to send a message and be willing to prune
the address list of the ones that bounce.
------------------------------
Date: Mon, 11 May 1998 02:47:24 GMT
From: techsoft@abcpages.com (Alex K)
Subject: Re: Email Authentication
Message-Id: <355666b0.2259480@news.ica.net>
okok.. I gave up...
]
On 10 May 1998 17:00:50 -0400, mjd@op.net (Mark-Jason Dominus) wrote:
>
>In article <35563375.21604858@news.ica.net>,
>Alex K <techsoft@abcpages.com> wrote:
>>how about trying to ping the current IP?
>
>You obviously haven't thought this through. That would be OK if you
>had read the FAQ, but you obviously haven't done that either.
>
>Typically, an email address is not associated with an IP address, and
>there is no way to deduce one. For example
>
> mjd@cis.upenn.edu
>
>is a perfectly valid email address; however there is no such computer
>as cis.upenn.edu, and there is no IP address for it.
>
>On the other hand,
>
> yobgorgle@plover.com
>
>is invalid even though plover.com has an IP address and will respond
>to pings.
>
>
------------------------------
Date: 11 May 1998 00:21:21 GMT
From: Zenin <zenin@bawdycaste.org>
Subject: Re: Email Authentication
Message-Id: <894846530.270872@thrush.omix.com>
Alex K <techsoft@abcpages.com> wrote:
: how about trying to ping the current IP?
$ ping best.com
ping: cannot resolve best.com: Unknown host
$ finger root@best.com
finger: unknown host: best.com
$ sendmail -bv bogususer@best.com
bogususer@best.com... deliverable: mailer esmtp, host best.com., user bogususer@best.com
Best Internet has 10's of thousands of users with
username@best.com. This is a vary, vary common setup.
The best method you have is when people give you an address you
check to make sure it "looks" valid. If it doesn't, ask them to
confirm that it's ok.
--
-Zenin
zenin@archive.rhps.org
------------------------------
Date: 11 May 98 00:01:22 GMT
From: "Leigh Vincent" <sjogbal@netconnect.com.au>
Subject: Expressions Using Dates
Message-Id: <01bd7c70$7e8579e0$2b01e680@lethal>
Hi All,
I have a problem with a perl script in trying to perform expressions
comparing dates. I am attempting to take a date and then check to see
where it fits in various ranges.
(eg 11-05-98, is it between 01-01-98 and 30-04-98 or is it between 01-05-98
and 30-05-98)
Any suggestions greatfully received to leigh.vincent@sjoghcs.org.au
Thanks in Advance.
------------------------------
Date: Mon, 11 May 1998 03:27:34 GMT
From: stu-w@usa.net.remove.everything.after.net (Stuart Wright)
Subject: How can you break out of a 'while... ' loop in a function?
Message-Id: <35566fe7.29271051@news.dial.pipex.com>
A simple question, but all the pearl FAQs are useless.
All I want is a basic perl/cgi reference - all the commands, functions
etc.
Very hard to find one.
Thanks
-----
Stuart Wright stu-w@usa.net.remove.everything.after.net
Software developer,
web author for the Hi-Fi and Home Cinema industries,
drummer and fast biker.
Visit my web site http://ds.dial.pipex.com/town/road/xmk67/
------------------------------
Date: Sun, 10 May 1998 19:58:54 GMT
From: Andrew Libby <alibby@voicenet.com>
Subject: Re: How can you break out of a 'while... ' loop in a function?
Message-Id: <3556073B.3D00B6B7@voicenet.com>
Stuart Wright wrote:
> A simple question, but all the pearl FAQs are useless.
> All I want is a basic perl/cgi reference - all the commands, functions
> etc.
> Very hard to find one.
> Thanks
One of the nice thing about the perl distribution is that it comes with
enough
documentation to kill a large farm animal. See man perlsyn, particularly
the next and last operators.
--
======================================================
Andrew Libby Unix Gimp
alibby@voicenet.com
------------------------------
Date: Sun, 10 May 1998 17:53:06 -0400
From: Jenna Farnham <webmaster@webmoose.com>
To: stu-w@usa.net
Subject: Re: How can you break out of a 'while... ' loop in a function?
Message-Id: <355621C2.BE347B8@webmoose.com>
>> A simple question, but all the pearl FAQs are useless.
All I want is a basic perl/cgi reference - all the commands, functions
etc.
Very hard to find one.
Thanks
<<
I like the O'Reilly "Camel Book" (Programming Perl). You can take a
look at: http://www.oreilly.com/catalog/pperl2/
Jenna
--
Jenna Farnham http://www.webmoose.com
webmaster@webmoose.com My opinions are.
"You are in a twisty little maze of URL's, all different."
------------------------------
Date: 11 May 1998 00:42:05 GMT
From: angst <angst@scrye.com>
Subject: Re: how to ignore new line characters in textarea - in forms
Message-Id: <6j5hgt$epq$1@jelerak.scrye.com>
Benjamin Holzman <bholzman@mail.earthlink.net> wrote:
: my $text = $q->param('text');
: $text =~ s/\n//g;
Add to this:
$text =~ s/\r//g;
Since most peecee enter keys output \r\n (IIRC, Macs just use \r, so you
really should check for both).
Although I've used textareas plenty of times, put the whole mess into
a scalar variable, and it outputs just fine, so I'm not sure why you
would be having this problem.
--
Erik Nielsen <eln@rmci.net>
solaris/perl/qmail/dns weenie
this post != views of anyone at all, really
"You are like...unix GOD" -- local tech support
------------------------------
Date: 11 May 1998 00:05:54 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: I need to delete temp files after 24 hours...
Message-Id: <6j5fd2$l5b$1@comdyn.comdyn.com.au>
In article <35512aa9.101597740@nntp.idsonline.com>,
root.noharvest.\@not_even\here.com (-) writes:
> Your answer is fine and dandy, but (and I'm not trying to be rude) the
> question is "how do I find out if "file" is older than 24 hours?" -
> which is the step prior to your explanation ;)
>
> Here's the easiest way to do it all.......
>
> ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev,
> $size, $atime, $mtime, $ctime, $blksize, $blocks) =
> stat(FILE_HANDLE);
Actually, since 24 hours is a day, you can use the -M file test:
# perldoc -f -X
[snip]
-M Age of file in days when script started.
[snip]
:)
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au | If it isn't broken, it doesn't have
Commercial Dynamics Pty. Ltd. | enough features yet.
NSW, Australia |
------------------------------
Date: 10 May 1998 17:02:10 -0500
From: mrw@uiuc.edu (Matthew R. Williams)
Subject: Re: is it possible to grab email address from visitor of your web page
Message-Id: <m2pvhlvl7h.fsf@bigglesworth.isdn.uiuc.edu>
"Denko" <d.sarajlic2@wlv.ac.uk> writes:
> Is it possible to get email address from someone who visits your home page -
> like as you can grab their IP address and things like that as environment
> variables(if he/she has specified it in browser they use)
Yes and no.
Yes, in that certain web browsers will give it to you.
No, in that it's impolite to snag information that you don't
explicity ask for.
It's okay to get demographics like IP and such, and getting
IP is a good way to track people who are going after the
three-year-old phf exploit.
But why would you be wanting their e-mail addresses? Planning
on sending them a little bit of the ol' unsolicited e-mail?
--
"So, would it be weird if someone were having sadomasochistic
fantasies about breakfast?"
-Greg Fast
---------------------------------------------------------------
Matthew R. Williams mrw@uiuc.edu
Geek of All Trades http://bigglesworth.isdn.uiuc.edu/~mrw/
---------------------------------------------------------------
------------------------------
Date: Sun, 10 May 1998 14:31:43 -0400
From: "Mike Coyle" <mike@coylesystems.com>
Subject: Local GUI Perl Apps via DHTML
Message-Id: <6j53gn$pfh@world6.bellatlantic.net>
While many individuals have cited that Perl's end user GUI is the web
browser, typically this has involved users interacting with a Perl program
running on a remote web server.
Has anyone investigated the possibilty of having some sort of applet/plugin
that would enable local Perl programs to be called from within the web
browser. This way, Dynamic HTML could be used to provide a rich front-end,
and remote/local processing can be optimized for the job at hand.
Thanks,
Mike
------------------------------
Date: Sun, 10 May 1998 21:45:24 +0200
From: "Martin Bentzen" <bentzen_nospam_@post8.tele.dk>
Subject: Re: Perl CGI problem...
Message-Id: <6j5063$780a$1@news-inn.inet.tele.dk>
>Check out the FAQ entry labeled
>"How do I change one line in a file/delete a line in a file/insert a
> line in the middle of a file/append to the beginning of a file?"
Hmm - I have read the FAQ, can't find the code I need...
Pleace help me.... :-)
/Martin
------------------------------
Date: Mon, 11 May 1998 00:27:58 GMT
From: mike@hyperreal.org
Subject: Perl for Win32 *not* in background?
Message-Id: <6j5gme$ngi$1@nnrp1.dejanews.com>
[I made a similar post about this in comp.os.ms-windows.nt.server.misc, but
this is a better explanation here]
I'm using a Windows NT application that allows me to run a "pre-process"
(basically, a system call) before it moves some files around. I have to have
this pre-process run a couple of Perl scripts and get some output files ready
for the application to chew on.
For reasons not worth going into here, the application is not capable of
passing complicated command lines to the pre-process shell, so rather than
telling it to run "perl.exe script.pl <infile >outfile", I have to tell it to
run "foo.bat" which is a DOS batch file containing that command line. So far
so good.
The problem is that perl.exe is apparently forking off a child process to run
the script.pl, and then exiting, returning me to the command prompt if I'm
doing this from a DOS window, or in the case of this application, returning
control to the application to try to chew on the output files. Hooray for
multitasking.
The thing is, the output files aren't ready for the application yet, because
the perl script takes a minute to run and get the files where they need to be.
If DOS had a "sleep" command I'd just chuck that into the batch file after it
runs the Perl scripts, so control wouldn't be returned to the application
until it was done. But there's not such command, as far as I can tell.
Putting "sleep (60);" in the Perl script is useless because the script is
already running in the background; it just lingers a little longer.
So is there a way to tell Perl for Win32, "wait till this bugger is
finished," or to have the batch file sleep, or am I completely
misunderstanding what is really going on and deserving of a good flaming?
Thanks,
Mike Brown
mike@hyperreal.org
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: 11 May 1998 00:17:03 GMT
From: mgjv@comdyn.com.au (Martien Verbruggen)
Subject: Re: Perl on Win95?
Message-Id: <6j5g1v$l5b$2@comdyn.comdyn.com.au>
In article <3551EF8A.1FF@surveystar.com>,
Glenn Davis <gdavis@surveystar.com> writes:
> So now that I've got Perl installed (and can run a script), how do I run
> Perl as a CGI script? What I'm trying to do is run a cgi script on a
> local (win95) machine (which is not set up as a web server). I want to
> use this system to test scripts before they get uploaded to the server
> we use. Any thoughts?
You can only run a CGI from a web server. You can emulate the thing
if you use CGI, and run it from the command line. It is not the same
however. You'll have to install a local web server. They are available
for win95. You'll have to ask somewhere else where to get them.
Martien
--
Martien Verbruggen |
Webmaster www.tradingpost.com.au |
Commercial Dynamics Pty. Ltd. | Curiouser and curiouser, said Alice.
NSW, Australia |
------------------------------
Date: Sun, 10 May 98 23:04:12 GMT
From: Anthony R Cadwallader <tonyc@clara.net>
Subject: Perl output for a gif image
Message-Id: <980510230412.n0000959.tonyc@mail.clara.net>
I have HTML pages existing onto which I want to place a gif image from a
selection of pre-existing, binary saved, gif images, based on user choice. I
have written the script and it works using server side includes, but this seems
to require an SHTML page to work, and I do not want to change existing pages to
this format, because they are well represented on web searches.
My HTML script call is <img src="/cgi-bin/myscript.cgi"> and I have concluded
the script with - print "Content-Type: image/gif\n\n";
print "$output";
The output is in the form: <img src = "1.gif"> which doesn't work, and I have
reformed it to read simply: "1.gif" and this doesn't work either. The former
output works using SSI. The question is, in what form must the output be for an
HTML page? - any ideas out there because of all the Perl books that I have
waded through, hardly any mention or give any help with image Content-Types.
Tony Cadwallader
Tony
------------------------------
Date: Mon, 11 May 1998 00:36:57 GMT
From: hawk@algonet.se (Hakan Hjelmstrom)
Subject: Re: Perl output for a gif image
Message-Id: <3557472b.54067424@news.algonet.se>
On Sun, 10 May 98 23:04:12 GMT, Anthony R Cadwallader wrote:
<snip>
> My HTML script call is <img src="/cgi-bin/myscript.cgi"> and I have concluded
> the script with - print "Content-Type: image/gif\n\n";
> print "$output";
> The output is in the form: <img src = "1.gif"> which doesn't work, and I have
> reformed it to read simply: "1.gif" and this doesn't work either. The former
> output works using SSI. The question is, in what form must the output be for an
> HTML page? - any ideas out there because of all the Perl books that I have
> waded through, hardly any mention or give any help with image Content-Types.
That's because it's not a Perl issue.
Nonetheless, you may have to either set a <BASE> for your documents
and give the relative path to your image from there OR always use the
full URL to the image.
I guess this is what's giving you problems.
Hekan Hjelmstrvm
hawk@algonet.se
------------------------------
Date: 10 May 1998 22:13:08 GMT
From: "Allan M. Due" <due@murray.fordham.edu>
Subject: Re: QRe: == vs. eq
Message-Id: <6j58pk$49t$0@206.165.146.190>
Greg Bacon wrote in message <6j4r5s$jn0$7@info.uah.edu>...
[snip]
>I can only assume that Lookout! doesn't warn posters when their lines
>are beyond the 78 columns that netiquette requests.
Well no, no warning but the default is 76 so Outlook users are unlikely to
change it since they are unsophisticated users by definition. Which
programs offer such warnings?
> (Keep in mind that you should try to keep the lines you write around 72
columns
Have changed the default values, thanks. But as long as I use Outlook
wisely (no MIME for example) I am not discomfiting folks unduly, is that
correct? Just trying to be clear.
AmD
------------------------------
Date: 11 May 98 00:16:30 GMT
From: "Leigh Vincent" <sjogbal@netconnect.com.au>
Subject: Re: reading a text file w/Perl
Message-Id: <01bd7c72$9ba5eb20$2b01e680@lethal>
Scott,
You could do something like this:
open(INFILE,"< text.file");
while (<INFILE>) {
printf("%s",$_);
}
This will read each line of the file and display it. This could then be
assigned to a variable or what ever else.
Hope this is what you're after.
leigh.vincent@sjog.org.au
Scott Vetter <svetter@ameritech.net> wrote in article
<35559E65.2E0A@ameritech.net>...
> Is there an easy way to read a text file with Perl? I've looked in
> the book to see if there was an easy way, but so far I haven't found
> it. The read specifies that you have to give it a line length, but what
> if there are viariable lenght records?
>
------------------------------
Date: 11 May 1998 00:45:50 GMT
From: angst <angst@scrye.com>
Subject: Re: Sender.pm module - Where can one obtain this file?
Message-Id: <6j5hnu$epq$2@jelerak.scrye.com>
Tecelote <tecelote@kpac.com> wrote:
: application form. The script needs to send an email with the form
: information to his email, write(append) the information to a data file
: and give a response page thanking the individual for their application
: information. The response page and writing to the data file work just
: fine, but we can't figure a way to get the script to send the desired
: email message. It's been suggested we use the sender.pm module, but
: are unable to locate the file. The given URL is either down or not
: responding.
The easy way is to get a command-line mailer for windows, and feed the
message to it, either with open("|mailer") or a system call.
I can't think of one offhand, but I know there are a couple available.
Check out the big online software warehouses (zdnet, shareware.com, etc).
Of course, you'll want to do sanity checking on any variables that you
pass to it.
--
Erik Nielsen <eln@rmci.net>
solaris/perl/qmail/dns weenie
this post != views of anyone at all, really
"You are like...unix GOD" -- local tech support
------------------------------
Date: Mon, 11 May 1998 12:53:26 +1200
From: Matt McKenzie <jasmatt@es.co.nz>
Subject: Stripping HTML Tags from a file
Message-Id: <35564C06.BD111944@es.co.nz>
I have a script that uses the Simple.pm module to fetch an HTML file
from the web and stores it into an @array for processing. I works
great....I can print the data, or mail it to myself...but the one thing
I really want to do is strip out the HTML tags.
I have spent days trying various methods including the HTML::Parser,
HTML::Filter modules, reading the FAQ's:
<snipped from perlfaq9>------How do I remove HTML from a string?
#!/usr/bin/perl -p0777
s/<(?:[^>'"]*|(['"]).*?\1)*>//gs
-----------------------------------
I'm not sure how to implement this into my script.
Any suggestions would help.
Matt
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.misc (and this Digest), send your
article to perl-users@ruby.oce.orst.edu.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
The Meta-FAQ, an article containing information about the FAQ, is
available by requesting "send perl-users meta-faq". The real FAQ, as it
appeared last in the newsgroup, can be retrieved with the request "send
perl-users FAQ". Due to their sizes, neither the Meta-FAQ nor the FAQ
are included in the digest.
The "mini-FAQ", which is an updated version of the Meta-FAQ, is
available by requesting "send perl-users mini-faq". It appears twice
weekly in the group, but is not distributed in the digest.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V8 Issue 2551
**************************************
