[9188] in Perl-Users-Digest
Perl-Users Digest, Issue: 2805 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jun 4 10:07:57 1998
Date: Thu, 4 Jun 98 07:00:57 -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 Thu, 4 Jun 1998 Volume: 8 Number: 2805
Today's topics:
Re: A Email to WWW GaTeWaY, is there such a Thing? (Wes Brown)
Re: accessing files on another server scott@softbase.com
Altavista, infoseek, etc. <arnoud@notenbomer.nl>
Re: Batch files? <perlguy@inlink.com>
Re: Can I email with attachements <Whatsup@icon.co.za>
Re: Child processes with Perl (Jonathan Stowe)
converting unix perl to nt perl <dritter@interpro.ch>
Re: converting unix perl to nt perl <mbl@startext.de>
Re: emacs 20.2 wrongly indents perl here documents <grossjohann@ls6.cs.uni-dortmund.de>
Re: help me to install perl on WinNT <xuchu@iscs.nus.edu.sg>
Re: HELP!!!!!!!!!!!!!!!!!!!!!!! chrishabs@my-dejanews.com
How can I write to specific line ? (Evgenya Borisenko)
Re: How can I write to specific line ? <quednauf@nortel.co.uk>
Re: Incrementing zero-padded numbers (Andy Chandler)
Module Net::SMTP <thealienz@thealienz.com>
Re: Module Net::SMTP <qdtcall@esb.ericsson.se>
Re: Module Net::SMTP (Chris Nandor)
Re: newbie....and counters.. <perlguy@inlink.com>
Re: newbie: trying to remove unwanted data from an arra <steveneu@visi.com>
order of execution of print statements? <agianni@acsu.buffalo.edu>
pattern match <iqbal@etc.prestel.co.uk>
Re: Perl class for newbie? <dorr@cetrel.lu>
Re: Perl Win32 binary installation <john@AtlanTech.COM>
Randal Schwartz to speak in Chicago (Jim Allenspach)
Re: Remote site retrival (Charlie Stross)
searching <thealienz@thealienz.com>
Sendmail script <thealienz@thealienz.com>
Re: Strange results from a script... <qdtcall@esb.ericsson.se>
Re: Use of HTML, POD, etc in Usenet (was: Re: map in vo (Chris Nandor)
Re: Use of HTML, POD, etc in Usenet (was: Re: map in vo <rsi@lucent.com>
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 4 Jun 1998 12:24:38 GMT
From: wes@prozac.eeap.cwru.edu (Wes Brown)
Subject: Re: A Email to WWW GaTeWaY, is there such a Thing?
Message-Id: <6l63m6$g6o$1@pale-rider.INS.CWRU.Edu>
Leon Brooks (leonb@ami.com.au) wrote:
: Jason Clifford wrote:
: > Igor wrote:
: > > If you know where I can find email-to-www gateway (a-la Hotmail) so that
: > > I could read email from my Web Browser via HTTP, please email me.
:
: I think that there is about to be a free one, based on PostGreSQL
: (http://www.postgresql.org), AppGEN
: (http://www.man.ac.uk/~whaley/ag/appgen.html) and either SendMail
: (http://www.sendmail.org) or qmail (http://www.qmail.org) and Apache
: (http://www.apache.org). If there is, it will be announced on COLA
: (news:comp.os.linux.announce) and FreshMeat (http://freshmeat.net). I
: think I'll call it SeeMail.
I am not so sure that Realmedia would be very happy with that.
http://www.realmediainc.com/assets/seeguide.html
It does sound cool though. Where can we find this program?
Wes
---
Wes Brown
ewb4@po.cwru.edu wes@prozac.cwru.edu
http://prozac.cwru.edu/wes/About.me.html
KB8TGR
------------------------------
Date: 4 Jun 1998 10:48:27 GMT
From: scott@softbase.com
Subject: Re: accessing files on another server
Message-Id: <6l5u1r$vpj$4@mainsrv.main.nc.us>
Inge Soetens (soetensi@se.bel.alcatel.be) wrote:
> Suppose I want to access a text-file on a certain webserver.
> To view the file in a browser, I can just just http://path/file.txt
> But if I want to open this txt-file , how can I do this in perl ?
> Is there a possibility to say :
> open (FILE, "http://path/file.txt") ??
No, but:
> Or is there a solution to this ?
Piece of cake! So easy you won't even believe it. The attached
graburl function will load the contents of a URL into an array.
Once it is in the array, you can do anything you want with it!
> Can somebody please give me some examples also ?
See the attached graburl function. This is more patented lazyware,
you have to parse the URL yourself if it is in the
form http://whatever.what.ever.ext/file.whatever. I have never
had to do this, so I've never written it.
Scott
--
Look at Softbase Systems' client/server tools, www.softbase.com
Check out the Essential 97 package for Windows 95 www.skwc.com/essent
All my other cool web pages are available from that site too!
My demo tape, artwork, poetry, The Windows 95 Book FAQ, and more.
----------------------------------------------------------------------
# The amazing graburl function!
# Usage: @junk = graburl("www.tonyrobbins.com", "/giant.html");
sub graburl {
my ($host, $file) = @_;
my ($remote, # the name of the SMTP server
$port, # the mail port
$iaddr, $paddr, $proto, $line); # these vars used internally
$remote = $host;
$port = 80;
$iaddr = inet_aton($remote) || die "no host: $remote";
$paddr = sockaddr_in($port, $iaddr);
$proto = getprotobyname('tcp');
select(SOCK);
$| = 1;
socket(SOCK, PF_INET, SOCK_STREAM, $proto) || die "socket: $!";
connect(SOCK, $paddr) || die "connect: $!";
select(STDOUT);
print SOCK "GET $file HTTP/1.0\n";
print SOCK "Accept: */*\n";
print SOCK "\n";
sleep(5);
@x = <SOCK>;
close (SOCK) || die "close: $!";
return @x;
}
------------------------------
Date: Thu, 4 Jun 1998 13:58:10 +0200
From: "arnoud de jong" <arnoud@notenbomer.nl>
Subject: Altavista, infoseek, etc.
Message-Id: <6l626e$gh7$1@info.service.rug.nl>
Hi,
Does anyone know how I can create a simple search engine. So I can create a
list of URL's and create a searchable index.
Any Ideas?
Arnoud
------------------------------
Date: Thu, 4 Jun 1998 11:32:14 GMT
From: Brent Michalski <perlguy@inlink.com>
Subject: Re: Batch files?
Message-Id: <357685BE.94D4201D@inlink.com>
The old:
$command="batchfile.bat";
system($command);
Will work too!
HTH,
Brent
------------------------------
Date: Thu, 4 Jun 1998 15:39:30 +0200
From: "Whatsup@now" <Whatsup@icon.co.za>
Subject: Re: Can I email with attachements
Message-Id: <6l682c$rhj$1@hermes.is.co.za>
Take a look at
Mail::Sender - http://www.fmi.cz/private/Jenda
Tom Grydeland wrote in message ...
>On Wed, 03 Jun 1998 03:53:29 GMT,
>Guy Doucet <gdoucet@ait.acl.ca> wrote:
>> I am running Perl scripts on my Novell Web Server. I am just starting to
>> use a JMerril's SENDSMTP.PL script to send e-mails. It seems to work,
>> but I was wondering if there is a way to include an attachment.
>
>Look for MIME::Tools or MIME::Lite (sp?) on CPAN
>
>> Sorry if I am posting in the wrong group, but if anyone here is doing
>> this I would appreciate your help. If I should search on the RFC822
>> specifications, does anyone know where I can get them.
>
><URL:http://sunsite.auc.dk/RFC/> in Denmark. You might have closer
>mirrors. There is supposedly one on
>
><URL:ftp://ds.internic.net/> but I'm unable to reach it now.
>
>> Guy Doucet
>
>--
>//Tom Grydeland <Tom.Grydeland@phys.uit.no>
> - Do radioactive cats have 18 half-lives? -
------------------------------
Date: Thu, 04 Jun 1998 09:36:31 GMT
From: Gellyfish@btinternet.com (Jonathan Stowe)
Subject: Re: Child processes with Perl
Message-Id: <3576698b.1718163@news.btinternet.com>
On Wed, 03 Jun 1998 23:28:40 -0500, Tim Stoddard wrote :
>I have a perl script that executes a shell script in the backgroud like
>this:
>
>system "/home/tims/somescript &";
>
>The perl script continues to process while the shell script does other
>things. The perl script eventually calls nineteen different shell
>scripts that all run in the background. After the perl script starts
>all the shell scripts I would like it wait until all the shell scripts
>finish processing before the perl script terminates. Is there any way
>for the perl script to keep track of its children processes?
>
It would probably be easier to fork, exec, wait explicitly .
/J\
Jonathan Stowe
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
------------------------------
Date: Thu, 4 Jun 1998 11:22:52 +0200
From: "Daniel Ritter" <dritter@interpro.ch>
Subject: converting unix perl to nt perl
Message-Id: <357665c7.0@news.datacomm.ch>
Does anybody have any expirience converting a simple feedback / order form
perl-script running on a
unix server using sendmail to NT using Netscape Messaging server 3.01 ?
Any advise will be appreciated.
Regards Dani
------------------------------
Date: Thu, 04 Jun 1998 12:03:51 +0200
From: Marcus Blaha <mbl@startext.de>
To: Daniel Ritter <dritter@interpro.ch>
Subject: Re: converting unix perl to nt perl
Message-Id: <35767107.2572@startext.de>
Daniel Ritter wrote:
>
> Does anybody have any expirience converting a simple feedback / order form
> perl-script running on a
> unix server using sendmail to NT using Netscape Messaging server 3.01 ?
>
> Any advise will be appreciated.
>
> Regards Dani
Hi Dani,
here is what I wrote yesterday in comp.lang.perl.misc to
cespirit@engr.csulb.edu:
Hi Carlo,
I had the same problem under NT. I used BLAT as an sendmail-comparable
tool under NT:
Her is a part of my code:
$rcpt='somebody@x.y';
if (!$stxtool::formempty){
if (&stxtool::isNT) {
$m_prog = "D:\\blat\\blat";
open (MESSAGE,"|$m_prog - -f $stxtool::FORM{'F_FROM'} -t $rcpt
-s \"$stxtool::FORM{'F_SUBJ'}\" -q") ;
}
else{
open (MESSAGE,"|sendmail $rcpt ") or die "mail nicht
aufgerufen";
print MESSAGE "From: $stxtool::FORM{'F_FROM'} \n" ;
print MESSAGE "Reply-to: $stxtool::FORM{'F_FROM'} \n";
print MESSAGE "Subject: $stxtool::FORM{'F_SUBJ'} \n";
}
print MESSAGE "Sender\t" . $stxtool::FORM{'F_FROM'} . "\n";
print MESSAGE $stxtool::formtext;
}
stxform::FORM is a hash containing FORM parameters
$stxtool::formtext contains preformatted text
Blat 1.5 may be found under
http://gepasi.dbs.aber.ac.uk/softw/Blat.html
Marcus
--
Marcus Blaha Tel.: +49.228.95996-16
startext Unternehmensberatung GmbH Fax.: +49.228.95996-66
Kennedyallee 2 / 53175 Bonn / Germany Compuserve 101317,3140
http://www.startext.de mailto:mbl@startext.de
------------------------------
Date: 04 Jun 1998 14:52:50 +0200
From: Kai Grossjohann <grossjohann@ls6.cs.uni-dortmund.de>
Subject: Re: emacs 20.2 wrongly indents perl here documents
Message-Id: <vafsoll8h25.fsf@ramses.cs.uni-dortmund.de>
>>>>> Jamie McCarthy <jamie@mccarthy.org> writes:
> I do enjoy the perl editing features, but indent-perl-exp has a few
> bugs. Most I can work around, one I can't. It doesn't know what a
> here document is. I get formatting like this:
Perl comes with cperl-mode.el which is a better perl mode. Cperl-mode
groks here documents.
kai
--
A black hole has no hair. (John Wheeler)
------------------------------
Date: 4 Jun 1998 09:36:08 GMT
From: wings <xuchu@iscs.nus.edu.sg>
Subject: Re: help me to install perl on WinNT
Message-Id: <6l5pq8$11l27@id4.nus.edu.sg>
Yingxue Li <yingxue@ee.tamu.edu> wrote:
: I tried to install Perl5.002 on my WinNT PC(using Gurusamy
: Saraty's binary version from www.perl.com), but failed at the last step
: and the error message was like:
: Copying distribution from ... to ...
: Can't spawn "cmd.exe": No such file or directory
: Copy failed!: No such file or directory.
: However I can install it on a Win95 PC.
: Can you help me to solve the problem? Thank you very much!
why dont u use Activeware's Perl for win32? it's Perl5.003 and easy to install.
--
wings
------
You cannot learn anything unless you almost know it already.
Email: xwings@usa.net, xuchu@iscs.nus.edu.sg
ICQ UIN: 1440319
http://gump.iscs.nus.edu.sg
------------------------------
Date: Thu, 04 Jun 1998 11:46:34 GMT
From: chrishabs@my-dejanews.com
Subject: Re: HELP!!!!!!!!!!!!!!!!!!!!!!!
Message-Id: <6l61eq$o9u$1@nnrp1.dejanews.com>
In article <01bd8f33$25e04240$ed36bdcc@Helpdesk.portalinc.com>,
"James" <mayo98@portalinc.com> wrote:
>
> hi, I wish u all good greetings....
> I'm from the philippines. I wanna ask u how would I set up our web server
> properly to
> run Perl 5.004 ?? I read that perl is downloaded by source and I need to
> compile it using
> C. But when I checked our web server it says :
>
> /usr/ucb/cc : language optional software package not installed.
>
> Does this mean that our Solaris has no C installed in it ??
>
Correct. Sun stopped shipping the OS with a C compiler when they moved
from SunOS to Solaris.
Either get the GNU C compiler or a binary distribution of Perl for Solaris.
Chris
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: 4 Jun 1998 09:40:15 GMT
From: evgenya@amos-01.cs.huji.ac.il (Evgenya Borisenko)
Subject: How can I write to specific line ?
Message-Id: <6l5q1v$h5m$1@news.huji.ac.il>
Hi,
I'd like to know is there a possibility to write (change) to a specific
line in a file ?
Thanx for any help,
Eugenia.
------------------------------
Date: Thu, 04 Jun 1998 13:00:36 +0100
From: "F.Quednau" <quednauf@nortel.co.uk>
Subject: Re: How can I write to specific line ?
Message-Id: <35768C63.2B189317@nortel.co.uk>
Evgenya Borisenko wrote:
> Hi,
>
> I'd like to know is there a possibility to write (change) to a specific
> line in a file ?
Read the perlfaq: Files and Formats /
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?
Second (!) from top. Should be first, shouldn't it? Who wants to know how
to flush a filehandle anyway...
ftp://ftp.demon.co.uk/pub/mirrors/perl/CPAN/doc/manual/html/perlfaq5.html
--
____________________________________________________________
Frank Quednau
http://www.surrey.ac.uk/~me51fq
________________________________________________
------------------------------
Date: 4 Jun 1998 13:09:01 GMT
From: andyc@netins.net (Andy Chandler)
Subject: Re: Incrementing zero-padded numbers
Message-Id: <slrn6nd73d.6q.andyc@worf.netins.net>
Sure, it's the easiest things that pass you by! Thanks all for the kick
in the head....
--
Andy Chandler
netINS, Inc.
andyc@netins.net
In article <6l4bn1$arj$1@nnrp1.dejanews.com>, pehanna@my-dejanews.com wrote:
>
>> I want to create a series of files based on incrementing zero-padded
>> numbers. For example, if I have the number 0001, I want to automatically
>> increment to 0002. I've got the incrementing numbers down (1,2,3,etc),
>> but I need to know how to do it ith the zero-padded numbers.
>
>Incrementing is incrementing; what you really want to know is "how do I pad a
>number with leading zeros?":
>
>$npadded = sprintf("%04d", $n);
>
>--
>Phil Hanna
>
>-----== Posted via Deja News, The Leader in Internet Discussion ==-----
>http://www.dejanews.com/ Now offering spam-free web-based newsreading
------------------------------
Date: Wed, 03 Jun 1998 23:55:52 +0800
From: Justin Archie <thealienz@thealienz.com>
Subject: Module Net::SMTP
Message-Id: <35757208.88654804@thealienz.com>
Could someone explain how to use the module known as Net::SMTP?
Justin Archie
------------------------------
Date: 04 Jun 1998 14:43:29 +0200
From: Calle Dybedahl <qdtcall@esb.ericsson.se>
Subject: Re: Module Net::SMTP
Message-Id: <is90nduyku.fsf@godzilla.kiere.ericsson.se>
Justin Archie <thealienz@thealienz.com> writes:
> Could someone explain how to use the module known as Net::SMTP?
What's wrong with the examples in the documentation?
--
Calle Dybedahl, UNIX Sysadmin
qdtcall@esavionics.se http://www.lysator.liu.se/~calle/
------------------------------
Date: Thu, 04 Jun 1998 13:21:30 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Module Net::SMTP
Message-Id: <pudge-0406980915500001@192.168.0.3>
In article <35757208.88654804@thealienz.com>, Justin Archie
<thealienz@thealienz.com> wrote:
# Could someone explain how to use the module known as Net::SMTP?
Well, it changed its name to The Module Formerly Known as Net::SMTP, but
now it is just The Module.
man Net::SMTP
perldoc Net::SMTP
If you don't have it installed, install it, and read the docs. Or invoke
CPAN.pm and get the readme:
perl -MCPAN -e 'readme "Net::SMTP"'
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: Thu, 4 Jun 1998 11:30:19 GMT
From: Brent Michalski <perlguy@inlink.com>
Subject: Re: newbie....and counters..
Message-Id: <3576854B.27F56667@inlink.com>
>what exactly does making your own counter involve? i hear it involves cgi
>scripts i believe but i'm not sure how to go about doing this sort of >thing.
Well,
Making a counter involves writing a program that increments a "counter
file" each time you call it. It also is helpful if you return the
result of the counter so that you can see what number you are at.
>(bear with me...i'll learn .... :)
If you *really* want to learn, I recommend the Camel book. Also,
www.perl.com has great information.
A little time doing research will get you a long way. The best way to
use "this type" of newsgroup is to attempt to write a program, if you
get stuck, research the problem thoroughly (ie. seaerching news
archives, perl sites, etc...). If you "still" can't solve the problem,
THEN send a message to the newsgroup and see if others can help.
Hope this helps!
Brent
------------------------------
Date: Thu, 04 Jun 1998 13:32:48 GMT
From: "Steve" <steveneu@visi.com>
Subject: Re: newbie: trying to remove unwanted data from an array....
Message-Id: <4mxd1.798$On1.3225814@ptah.visi.com>
Infinitely many thanx to everybody for your help.
Shaun Sides wrote in message ...
>Original message by: Steve Neuharth <steven@mail.dhc.com>
>Date: Wed, 03 Jun 1998 21:33:03 GMT
>Subject: newbie: trying to remove unwanted data from an array....
>
>
>> O.k. I KNOW there's an easy answer to this.... I can't seem to find it
>> anywhere....
>> I've got an array (@rawoutput). I only need the lines that contain
>> "SUB-TOTAL:".... I'm trying some thing like this.....
>> $x=0;
>> for ($y=0;$y <= @rawoutput; $y++){
>> if (@rawoutput[$y] =~ /SUB-TOTAL:/) {
>> @output[$x] = @rawoutput[$y];
>> $x++;
>> }
>> }
>> @output never seems to populate with data (not sure why).
>>
>> I was thinking there should be a way to do it something like this
(?).......
>> @output = (@rawoutput =~ /SUB-TOTAL:/);
>
>Ummm.
>
> foreach (@rawoutput) {
> push(@output, $_) if /SUBTOTAL:/;
> }
>
>See if that helps. ;-)
>
>--
>===========================================================================
===
> Shaun L. Sides | Hey! CyberGold | arch@abts.net
>Free Randal Schwartz and Ric Flair! | wastes yer time |
arch@sara.mmlc.nwu.edu
>===========================================================================
===
> The time for desperation is upon us. Let's play.
> First Wizard Zeddicus Zu'l Zorander
>===========================================================================
===
------------------------------
Date: Thu, 04 Jun 1998 09:29:22 -0400
From: Andrew S Gianni <agianni@acsu.buffalo.edu>
Subject: order of execution of print statements?
Message-Id: <3576A131.191ED2C4@buffalo.edu>
This is something that I've had trouble with before, and not only in
PERL (maybe in C to?) in the following code:
print "opening blah_blah_blah...\n";
open (sesame, "blah_blah_blah") or die "couldn't open blah_blah_blah\n";
while (<sesame>){
...
If it can't open the file, it'll print out the die statement before the
"opening blah_blah_blah..." statement. Is there anyway to force order of
output? This also happens to me with combinations of just print
statements like:
print "processing...";
while(<stuff>){
...
}
print "done\n";
Most often it seems to wait to print out the "processing..." part until
after the loop is done. Is this just optimization by the interpreter
maybe?
Any suggestions apreciated...
Andrew
--
Andrew Gianni - Applications Developer "Not till we are lost, in other
SUNY at Buffalo - ACS/CIT words, not till we have lost
215 MFAC, Ellicott Complex, Box 610016 the world, do we begin to
Buffalo, NY 14261-0016 find ourselves, and realize
(716)645-3587x7009 fax:(716)645-3588 where we are and the
agianni@buffalo.edu infinite extent of our
http://www.cs.buffalo.edu/~agianni/ relationships" - Thoreau
------------------------------
Date: Thu, 04 Jun 1998 10:21:27 +0100
From: Iqbal gandham <iqbal@etc.prestel.co.uk>
Subject: pattern match
Message-Id: <35766717.82A66AA3@something.com>
Hi
I have a text file full of lines like below
NW1*, NW8*, SE1, SE11, SE17, SE5, SW1, SW10, SW11, SW1A,
SW1E, SW1H, SW1P, SW1V, SW1W, SW1X, SW1Y, SW3, SW4, SW5, SW6,
SW7, SW8, W1*, W1A*, W1E*, W1H*, W1M*, W1N*, W1P*, W1R*,
W1V*, W1X*, W1Y*, W2*, W8*, W9*;D5482.htm
What I have is a web page where users enter in a string. I want to see
which line contains a match, and then goto that file listed at the end.
Firstly how do I either match on teh first three or four chracters,
cause as you can see some like SW8 only have 3 charcaters in it, so if
someone enters SW83 2ER, I need that to match just as if someone entered
SW1V 2ER. I cant match on just the first two chracters because some SW*
point to other files.
Also whats the quickest way od doing such a match, I presume its not to
grep, and tyen split on the semi colon, it is quicker to read the file
into a array or something.
I think what I need to do is to first match the first 3 characters, and
then match the fourth.
One last thing, if I have a wildcard in the file eg NW8*, how do I get
it to match if someone enters in NW81 3WE, because it will see NW8* in
the file, and not match.
Thanks
Iqbal
PS If there are any FAQ's etc (READ the perl ones) on doing something
like this plesae let me know
email : iqbal@etc.prestel.co.uk
------------------------------
Date: Thu, 04 Jun 1998 12:37:26 +0200
From: Denis DORR <dorr@cetrel.lu>
Subject: Re: Perl class for newbie?
Message-Id: <357678E6.614BC181@cetrel.lu>
Cameron Dorey wrote:
> [posted only]
>
> (actually sticking my nose in and answering a question directed to TP)
>
> Dan Franco wrote:
> >
> > > > Please remove the DONTSPAM from your email address to get email courtesy
> > > copies of replies. :-)
> >
> > I mind checking the newsgroup for replies less than I mind deleting
> > spam. :) Don't you get a lot of spam when you post in the clear?
>
> Actually, I don't. I've been posting here and on other comp.* and sci.*
> groups fairly regularly, and I get at most an email spam or two a week.
You lucky guy !
I'm posting from time to time in a couple of comp.* groups and now I got
every morning two or three messages telling me how to earn a lot of
money or how to spend it on xxx.hardcore.com sites or by buying videos
of Pam Anderson, Tonya Harding or Monica Lewinsky ...
Anyway, when I'm asking for an advice, I prefer that the helpy guy only
has to press REPLY.
--
dorr@cetrel.lu
------------------------------
Date: 04 Jun 1998 11:45:06 +0200
From: John Hughes <john@AtlanTech.COM>
Subject: Re: Perl Win32 binary installation
Message-Id: <ufpvgpa4bh.fsf@microlite.CalvaCom.FR>
Boris Lantrewitz <lantrewi@do.isst.fhg.de> writes:
> On hand I have a binary Installation of Perl for Win32
Um. Where?
--
John Hughes <john@AtlanTech.COM>,
Atlantic Technologies Inc. Tel: +33-1-43204546
24 rue Montbrun, Fax: +33-1-43204579
75014 PARIS.
------------------------------
Date: 4 Jun 1998 07:40:37 -0500
From: jima@MCS.COM (Jim Allenspach)
Subject: Randal Schwartz to speak in Chicago
Message-Id: <6l64k5$png@Venus.mcs.net>
Keywords: randal,merlyn,chicago,jacph
Perl hacker and karaoke enthusiast Randal Schwartz will be giving
his JACPH (Just Another Convicted Perl Hacker) talk on Saturday, June 27th,
1998 at the Harold Washington Library at noon.
Mr. Schwartz will speak on computer security and public policy,
issues of pressing importance to computer professionals. All interested
professionals, students, and members of the public are encouraged to attend.
This event is sponsored by Chicago Perl Mongers, and is open to the public.
Donations to Mr. Schwartz's legal and travelling expenses will be
appreciated.
For more information, contact James Allenspach at jima@mcs.net, or
check out the Chicago Perl Mongers homepage at http://chipm.i-2.com/.
jma
------------------------------
Date: Thu, 04 Jun 1998 11:49:23 GMT
From: charlie@antipope.org (Charlie Stross)
Subject: Re: Remote site retrival
Message-Id: <slrn6nd2eo.jjv.charlie@cs.ed.datacash.com>
In the name of Kibo the Compassionate, the Merciful,
on Thu, 04 Jun 1998 06:52:57 GMT,tstranger@my-dejanews.com
the supplicant <tstranger@my-dejanews.com> implored:
>Hi, I'm relatively new to CGI programming and I was wondering if any of you
>could give me and advice or just tell me how it could be done(In perl). What
>I need is to download a Web page from a remote server and then save it on the
>local server. Any help would be greatly appriciated.
>Thank you
Go to your nearest CPAN site and investigate LWP (LibWWW-Perl). This
contains tools to do what you want. (If you're driving your program
via CGI, you also want to look at the CGI modules, which will save
you a lot of legwork.)
If you don't know what CPAN is, read the FAQ.
You can find links to CPAN and the FAQ on the web at www.perl.com.
-- Charlie
"Computers depreciate faster than you expect, even when you take
Charlie's Depreciation Hypothesis into account"
-- Charlie's Depreciation Hypothesis
------------------------------
Date: Wed, 03 Jun 1998 22:24:55 +0800
From: Justin Archie <thealienz@thealienz.com>
Subject: searching
Message-Id: <35755CB7.F336F290@thealienz.com>
I am writing a script a I need help with a little problem.
I want my perl script to go through a string "$line" and remove all HTML
tags, find all the <A HREF> and <IMG> tags and pull out the URL that are
in them. Another thing i want to do is if the script detects a URL or
email address that it automatically sets up a link with that http://,
gopher://, plus the url in it.
Please if you can help on any of these problems it is greatly
appreciated..
Thanx,
Justin Archie
------------------------------
Date: Wed, 03 Jun 1998 22:27:22 +0800
From: Justin Archie <thealienz@thealienz.com>
Subject: Sendmail script
Message-Id: <35755D4A.F955E5BC@thealienz.com>
Does anyone have a script that sendmails internally... Calling its own
ports and timeout status... Please I need one for the script that I am
making and it would really help me. I must be able to edit the script
though, but all credit is given to the creator. I must also be able to
redisrtibute the script. Please help....
Thanx,
Justin Archie
------------------------------
Date: 04 Jun 1998 15:30:03 +0200
From: Calle Dybedahl <qdtcall@esb.ericsson.se>
Subject: Re: Strange results from a script...
Message-Id: <is67ihuwf8.fsf@godzilla.kiere.ericsson.se>
jaddle@po-box.mcgill.ca (Jon-o Addleman) writes:
> it won't work.
Have you tried a bullwhip? I believe that's what you traditionally use
on oxen when they won't work. Maybe it'll help for perlscripts as well.
Free hint for the clueless: You may get more useful help if you
actually describe the problem. Despite what you may think, most perl
programmers aren't telepathic mutants.
--
Calle Dybedahl, UNIX Sysadmin
qdtcall@esavionics.se http://www.lysator.liu.se/~calle/
------------------------------
Date: Thu, 04 Jun 1998 13:24:50 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Use of HTML, POD, etc in Usenet (was: Re: map in void context regarded as evil - suggestion)
Message-Id: <pudge-0406980919100001@192.168.0.3>
In article <896915435.549707@thrush.omix.com>, Zenin
<zenin@bawdycaste.org> wrote:
# Chris Nandor <pudge@pobox.com> wrote:
# : Huh? I have never seen a POD reader built-in to a newsreader. Hence, POD
# : in a post will look the same to everyone, necessarily.
#
# If you're using a format other then text/plain, by RFC 1036 it must
# be declared as such. Therefor, the reader would try to run whatever
# it had mapped to handle type text/x-pod, if it had such a tool
# available.
It "must" be declared as such?
So if I am quoting perlfaq, I need what, a separate MIME attachment? So
if someone asks what is a JAPH, and I respond:
=head2 What is a JAPH?
These are the "just another perl hacker" signatures that some people
sign their postings with. About 100 of the of the earlier ones are
available from http://www.perl.com/CPAN/misc/japh .
... now I have violated the RFC?
I don't think so. If you want to complain to the Usenet police about it,
be my guest. Have your people talk to my people.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10 1FF77F13 8180B6B6'])
------------------------------
Date: 04 Jun 1998 09:41:46 -0400
From: Rajappa Iyer <rsi@lucent.com>
Subject: Re: Use of HTML, POD, etc in Usenet (was: Re: map in void context regarded as evil - suggestion)
Message-Id: <xny1zt5wag5.fsf@placebo.ho.lucent.com>
abigail@fnx.com (Abigail) writes:
> Zenin (zenin@bawdycaste.org) wrote on MDCCXXXVII September MCMXCIII in
> ++ What's wrong with using
> ++ ---------------------------------------------------------------
> ++ instead of <hr>?
>
> Standards.
Aah... so HTML is more standard than ASCII? Thanks for this nugget.
--
Rajappa Iyer <rsi@lucent.com> #include <std_disclaimer.h>
We're too busy mopping the floor to turn off the faucet.
------------------------------
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 2805
**************************************
