[18179] in Perl-Users-Digest
Perl-Users Digest, Issue: 347 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Feb 24 03:05:33 2001
Date: Sat, 24 Feb 2001 00:05:10 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <983001909-v10-i347@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Sat, 24 Feb 2001 Volume: 10 Number: 347
Today's topics:
autoviv article (was Re: Basic: Arrays, shift, and the <uri@sysarch.com>
Re: Cross Reference Listing of Variables (Ben Okopnik)
Re: Difficult Split Question <joe+usenet@sunstarsys.com>
Re: Free debugger suggestions <mshort@usol.com>
Re: How can I detect if program is run by cron? (Charles DeRykus)
Re: HTTP connection (David Efflandt)
Re: iis/cgi/perl invoking applications from... <bwalton@rochester.rr.com>
Re: Is an array of hashes the best way to do this? (Gwyn Judd)
Re: max value in list? (Gwyn Judd)
Re: max value in list? <uri@sysarch.com>
Re: max value in list? <tony_curtis32@yahoo.com>
Re: Modules problem. To stupid to understand? <rick.delaney@home.com>
Re: Perl in UNIX (Gwyn Judd)
Re: Perl in UNIX (Steven Smolinski)
Re: Perl in UNIX (Gwyn Judd)
Re: Question.about s/// (Ben Okopnik)
re-post / re- direct help needed <tom@hotversion.com>
simple question on array splice hack <cadet@alum.mit.edu>
Re: simple question on array splice hack <uri@sysarch.com>
SMTP server (The Mosquito ScriptKiddiot)
Re: SMTP server <uri@sysarch.com>
Re: SMTP server <godzilla@stomp.stomp.tokyo>
Re: SMTP server (The Mosquito ScriptKiddiot)
Re: SMTP server (Gwyn Judd)
Re: submit formbox to perlscript (David Efflandt)
Variable Cross Reference Listing <Bret.Tucker@home.com>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 24 Feb 2001 04:25:51 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: autoviv article (was Re: Basic: Arrays, shift, and the mystery element)
Message-Id: <x71ysoiu5r.fsf_-_@home.sysarch.com>
>>>>> "RM" == Ren Maddox <ren@tivoli.com> writes:
RM> Daniel Berger <djberge@uswest.com> writes:
>> while($arrayref->[0]->{name} =~ /dan|ginger/i){
RM> This line autovivifies a hash reference, if there isn't one, in which
RM> to lookup "name". I think some people even consider this a bug,
RM> though i expect there are reasons that it isn't going to change.
for more on autovivification see my new article at:
http://tlc.perlarchive.com/articles/perl/ug0002.shtml
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: 24 Feb 2001 04:55:02 GMT
From: ben-fuzzybear@geocities.com (Ben Okopnik)
Subject: Re: Cross Reference Listing of Variables
Message-Id: <slrn99efhq.bu.ben-fuzzybear@Odin.Thor>
The ancient archives of Fri, 23 Feb 2001 23:15:37 GMT showed
Bret Tucker of comp.lang.perl.misc speaking thus:
>SSBoYXZlIHNlYXJjaCBQZXJsIGNvbW1hbmQgbGluZSB2YXJpYWJsZXMgYW5kIGRvIG5vdCBzZWUg
>aG93IHRvIGdldCBhIGxpc3Rpbmcgb2YgdmFyaWFibGVzIGluIHByb2dyYW06IA0KDQphLiBkZWNs
>YXJlZCBidXQgdW51c2VkDQoNCmIuIGRlY2xhcmVkIGFuZCB1c2VkIGluIHRoZSBmb2xsb3dpbmcg
>bGluZSAoYnkgbnVtYmVycykNCg0KQW55IGhlbHAgZ3JlYXRseSBhcHByZWNpYXRlZC4NCkJyZXQN
>Cg==
"Now, Bob, that's what we call a 'regex'."
Ben Okopnik
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Any sufficiently advanced Operating System is indistinguishable from
Linux. -- Jim "The Answer Guy" Dennis
------------------------------
Date: 23 Feb 2001 21:19:18 -0500
From: Joe Schaefer <joe+usenet@sunstarsys.com>
Subject: Re: Difficult Split Question
Message-Id: <m3ofvs3jrt.fsf@mumonkan.sunstarsys.com>
"Bertilo Wennergren" <bertilow@chello.se> writes:
> Joe Schaefer:
>
> > Yes, and there are faster snippets than yours as well, but I
> > won't humor the small-minded hobgoblins. Benchmarking code on
> > a line-by-line basis is no way to learn how to program.
>
> No. But the work you do trying to get the code to run faster
> gives plenty of opportunity to find out new things about Perl.
That's true, but OP's question was so terribly botched here
that rolling out a benchmark of erroneous solutions just
clouded the issues further.
> But thanks anyway for pointing out mistakes in the code. It could
> have been done in a slightly friendlier way though.
Actually I liked your solution the best since it handled most
cases better than the others did. Sorry for coming across
so mean, but it's not you I was angry with.
> I find it a bit annoying that you use wors like "troll" and
> "hobgoblin" without clearly stating who you mean. I even got
> the feeling that you're calling me a troll or hobgoblin. If that
> is so, why?
I wasn't. However, you know as well as I that this is not a
"trivial" modification of the FAQ answer, and OP said that
he tried to make the FAQ answer work but couldn't see how.
He's not alone in that, but people jumped all over him anyway.
In fact, it's a tricky problem, but so long as OP doesn't
expect too much, there's lots of decent solutions available.
Yet rather than discussing the advantages/limitations of the
different answers, the troll hoodwinked us into discussing
irrelevant issues rather that the lousy perl that generated
them. That's just what trolls do, and it's why people try so
hard to ignore them. IMO including the troll's code in your
own was your sole mistake.
> Now, back to my copy of the Camel (perhaps I should stick to
> it rather than this group...).
Perhaps so. The ideas that some people float around here
(occasionally with malice) are nothing but poison for a new
programmer. Best to let Wall et. al. form the basis of your
opinions regarding Perl until you've written enough perl to
have formed your own.
Best wishes and continued success.
--
Joe Schaefer "A foolish consistency is the hobgoblin of little minds"
-- Ralph Waldo Emerson
------------------------------
Date: Fri, 23 Feb 2001 22:27:28 -0800
From: "mshort" <mshort@usol.com>
Subject: Re: Free debugger suggestions
Message-Id: <t9ea91cipsab3b@corp.supernews.com>
Thanks for the suggestions, I'm in the middle of downloading VIM for
Windows. Eventually I will shift to Linux, but the move is slow, only
because Linux is also new to me.
Sincerely,
Matt
Chris Stith <mischief@velma.motion.net> wrote in message
news:t9aq9urp8l0vcd@corp.supernews.com...
> Martijn Mulder <soso@open.net> wrote:
>
> [ An author unattributed by Mertijn Mulder wrote the following. Please
> make attributions for quotes. ]
>
> >> Any suggestions on another editing tool?
> >>
>
> > the makefile etc. The closest to VI you can get in a DOS environment!
> > Groeten, Martijn
>
> Except a DOS or Windows port of vi, of which there are many. There are
> also emacs ports for both DOS and Windows., and I believe a port of
> the editor 'joe' to DOS.
>
> Chris
>
> --
> Christopher E. Stith
> Product shown enlarged to make you think you're getting more.
>
------------------------------
Date: Sat, 24 Feb 2001 02:30:35 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: How can I detect if program is run by cron?
Message-Id: <G98pMz.70B@news.boeing.com>
In article <974kv4$qui$1@boomer.cs.utexas.edu>,
Logan Shaw <logan@cs.utexas.edu> wrote:
>In article <slrn99bieq.9kv.efflandt@efflandt.xnet.com>,
>David Efflandt <efflandt@xnet.com> wrote:
>>On Thu, 22 Feb 2001 16:06:11 +0800, John Lin <johnlin@chttl.com.tw> wrote:
>>>How to detect whether the program is run by cron?
>> ... [snip] ...
>
>Has anyone mentioned running the "tty" program as a way of telling
>whether the program is being run interactively or not?
>
Unless I'm missing something, tty(1) would only be able to
detect if there's redirection so would pick up pipes and
backgrounding as well:
/bin/sh -c 'echo | tty'
not a tty
/bin/sh -c 'tty &'
not a tty
The Perl Cookbook program below determines if the program has
exclusive control of the tty. That'd eliminate simple re-
direction, for instance, but still couldn't differentiate
between a cron and a background job. So even this isn't
definitive.
#!/usr/bin/perl -w
# From: "Perl Cookbook (section 15.2)":
# Testing Whether a Program is Running Interactively
use POSIX qw/ getpgrp tcgetpgrp/;
use strict;
sub I_am_interactive {
local *TTY;
open(TTY, "/dev/tty") or die "can't open /dev/tty: $!";
my $tpgrp = tcgetpgrp(fileno(TTY));
my $pgrp = getpgrp();
close TTY;
return ($tpgrp == $pgrp);
}
print I_am_interactive() ? "interactive\n" : "NOT interactive\n";
__END__
--
Charles DeRykus
------------------------------
Date: Sat, 24 Feb 2001 02:40:58 +0000 (UTC)
From: efflandt@xnet.com (David Efflandt)
Subject: Re: HTTP connection
Message-Id: <slrn99e7ph.ard.efflandt@efflandt.xnet.com>
On Fri, 23 Feb 2001 16:37:13 -0800, Mahesh A <maheshasolkar@yahoo.com> wrote:
>Hi,
>
>How can i establish an HTTP connection with a host and communicate with it?
If you do not have LWP module (which has many built-in functions for
that), see the webget example in 'perldoc perlipc'.
However, it is best to insert a Host: header just in case you are dealing
with virtual hosts, so the server knows which vhost to direct it to.
--
David Efflandt efflandt@xnet.com http://www.de-srv.com/
http://www.autox.chicago.il.us/ http://www.berniesfloral.net/
http://cgi-help.virtualave.net/ http://hammer.prohosting.com/~cgi-wiz/
------------------------------
Date: Sat, 24 Feb 2001 02:55:06 GMT
From: Bob Walton <bwalton@rochester.rr.com>
Subject: Re: iis/cgi/perl invoking applications from...
Message-Id: <3A9722FB.ADCEC4A8@rochester.rr.com>
erb wrote:
...
> of course i tried to use:
> system 'c:\ease3\winease.exe c:\ease3\files\control.bas';
> to do it but if i execute the script from IE/Netscape the winease.exe
> program comes back with a:
>
> "The instruction at "0x0034afe4" referenced memory at "0x00000000".
> The memory could not be "read".
>
> and then terminates.
...
Please don't post the same note multiple times. Sounds to me like your
"winease" program (whatever that is) has a problem. Try substituting a
dummy program in place of winease (maybe just a Perl "Hi there"), and
see if that works. If so, try getting the latest version or patches or
whatever for winease.
--
Bob Walton
------------------------------
Date: Sat, 24 Feb 2001 02:07:18 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Is an array of hashes the best way to do this?
Message-Id: <slrn99e5ql.sg8.tjla@thislove.dyndns.org>
I was shocked! How could Ed Waldspurger <ewald@certifichecks.com>
say such a terrible thing:
>my @cartitems = readcart($cartid);
>
>for (0..(@cartitems-1)) {
> if (exists $cartitems[$_]{'SKU'}) {
> if ($cartitems[$_]{'SKU'} eq "some_product" &&
> $cartitems[$_]{'QTY'} > 1) {
> # Do something here
> }
> }
>}
>
>This seems very cumbersome. Is there a better data structure I could be
>using, or a more efficient way of testing this condition? The key I am
Well you might want to think about using a hash-of-hashes. This will
allow you to avoid doing the loop over each item in the array if you
know the names of the things that have restrictions. You would make the
hash-keys be the SKU codes. Failing that I can make your code a little
simpler:
foreach $item (@cartitems)
{
if (exists $item->{SKU})
{
if ($item->{SKU} eq 'something'
&& etc)
{ # blah
}
}
}
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
I've seen the light around the bend it only leads closer to the end.
-Anton Toth
------------------------------
Date: Sat, 24 Feb 2001 02:10:11 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: max value in list?
Message-Id: <slrn99e600.sg8.tjla@thislove.dyndns.org>
I was shocked! How could Damian Conway <damian@cs.monash.edu.au>
say such a terrible thing:
>Tony Curtis <tony_curtis32@yahoo.com> writes:
>
>>> So, any suggestions for a more concise way to grab the
>>> max value from a list?
>
>...or, of course, boring old:
>
> use List::Util 'max';
> $max = max @list;
Which I like to point out, runs as compiled C code on many platforms so
will probably be the fastest solution for sufficiently large lists.
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
A husband is a man who wishes he had as much fun when he goes on business
trips as his wife thinks he does.
-Ann Landers, "Creators Syndicate"
------------------------------
Date: Sat, 24 Feb 2001 04:22:18 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: max value in list?
Message-Id: <x74rxkiubo.fsf@home.sysarch.com>
>>>>> "DC" == Damian Conway <damian@cs.monash.edu.au> writes:
DC> Tony Curtis <tony_curtis32@yahoo.com> writes:
>>> So, any suggestions for a more concise way to grab the
>>> max value from a list?
DC> ...or, of course, boring old:
DC> use List::Util 'max';
DC> $max = max @list;
boring but understandable to the unwashed masses. :)
not everyone understands why chocolate bars only come in fixed sizes!
:)
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: 23 Feb 2001 22:23:56 -0600
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: max value in list?
Message-Id: <87hf1kso83.fsf@limey.hpcc.uh.edu>
>> On 24 Feb 2001 00:15:45 GMT,
>> damian@cs.monash.edu.au (Damian Conway) said:
> Tony Curtis <tony_curtis32@yahoo.com> writes:
>> So, any suggestions for a more concise way to grab the
>> max value from a list?
No I didn't :-) Please be more careful with attributions!
--
The avalanche has already started.
It is too late for the pebbles to vote.
------------------------------
Date: Sat, 24 Feb 2001 04:46:54 GMT
From: Rick Delaney <rick.delaney@home.com>
Subject: Re: Modules problem. To stupid to understand?
Message-Id: <3A974000.4D085D21@home.com>
[posted & mailed]
Lurviga Ben wrote:
>
> 1 What am I doing wrong in the code below?
A spelling mistake (see below).
> Note: I'm using MacPerl which is based on 5.004.
> Below are four files, when I do a syntax check on the content of
> 'news.pl' I get the following error messages:
>
> File "Dokument:Scripts:Perl:JEM:Util.pm"; Line 16: Subroutine
> formatDate redefined.
> File "Dokument:Scripts:Perl:JEM:Util.pm"; Line 20: Subroutine
> formatTime redefined.
> File "Dokument:Scripts:Perl:JEM:Util.pm"; Line 24: Subroutine trim
> redefined.
I get totally different errors about not finding Jem/Util.pm but I'm
using a case-sensitive OS.
> --- file PairParse.pm
> package JEM::Info::PairParse;
> use strict;
>
> BEGIN{
> use Exporter ();
> use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
> $VERSION = 0.1;
> @ISA = qw(Exporter);
> @EXPORT = qw(&parse);
> %EXPORT_TAGS = ();
> @EXPORT_OK = ();
> }
It is not necessary to put any of this in BEGIN (though it shouldn't
hurt). BEGIN is for stuff that should happen before the runtime phase
of your program. The two lines with "use" happen before that phase
anyway so don't need to be in BEGIN. The global variable declarations
don't need early initialization either.
> use vars @EXPORT_OK;
>
> use JEM::Error;
> use JEM::Util;
^^^
Note uppercase. So Perl has an entry for 'JEM/Util.pm' in %ISA when
this is used. %ISA is used by perl to ensure that the module's code is
loaded and compiled only once.
> --- file Error.pm
> package JEM::Error;
> use strict;
[snip]
> use Jem::Util;
^^^
Note lowercase. On my system, there is no such file as Jem/Util.pm so I
get an error saying so. I assume that on the Mac filenames are
case-insensitive so the file 'JEM/Util.pm' is found, allowing
compilation to continue. But because it is spelled differently, perl
loads and compiles the file again since it can't find 'Jem/Util.pm' in
%ISA (only 'JEM/Util.pm' is there). This leads to the subroutine
redefined warnings as the subroutines are compiled for a second time.
The import routine wouldn't get called twice because there is no import
in package Jem::Util--there is no such package.
--
Rick Delaney
rick.delaney@home.com
------------------------------
Date: Sat, 24 Feb 2001 02:13:56 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Perl in UNIX
Message-Id: <slrn99e673.sg8.tjla@thislove.dyndns.org>
I was shocked! How could Ilmari Karonen <iltzu@sci.invalid>
say such a terrible thing:
>What you could do, however, is to include the Perl code as a string
>*in* the C program, and hand it to perl as a long -e option. Then
>chmod the program to 711.
But then you can read the string in 'top'. How about passing it to perl
via a pipe?
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
Carmel, New York, has an ordinance forbidding men to wear coats and
trousers that don't match.
------------------------------
Date: Sat, 24 Feb 2001 02:49:44 GMT
From: sjs@linux.ca (Steven Smolinski)
Subject: Re: Perl in UNIX
Message-Id: <slrn99ecqs.k0.sjs@ragnar.stevens.gulch>
I was annoyed! How could Gwyn Judd <tjla@guvfybir.qlaqaf.bet>
never change his attribution string:
> I was shocked! How could Ilmari Karonen <iltzu@sci.invalid>
> say such a terrible thing:
>
> >What you could do, however, is to include the Perl code as a string
> >*in* the C program, and hand it to perl as a long -e option. Then
> >chmod the program to 711.
>
> But then you can read the string in 'top'. How about passing it to perl
> via a pipe?
Either way, what would you do about strings(1)?
Steve
--
Steven Smolinski => http://www.steven.cx/
------------------------------
Date: Sat, 24 Feb 2001 03:12:39 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: Perl in UNIX
Message-Id: <slrn99e9l6.sv6.tjla@thislove.dyndns.org>
I was shocked! How could Steven Smolinski <sjs@linux.ca>
say such a terrible thing:
>Either way, what would you do about strings(1)?
Well it all becomes a bit of security through obscurity after that. I
suppose you could UUencode the string. And then gzip it. And then
encrypt the code with PGP. And then email it to yourself. Via one of
those secure-email-via-SSL gateways that keep cropping up. And then
store it in a porno image via steganography. But it would never work.
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
A dozen, a gross, and a score,
Plus three times the square root of four,
Divided by seven,
Plus five time eleven,
Equals nine squared plus zero, no more.
------------------------------
Date: 24 Feb 2001 06:04:31 GMT
From: ben-fuzzybear@geocities.com (Ben Okopnik)
Subject: Re: Question.about s///
Message-Id: <slrn99ejk3.bu.ben-fuzzybear@Odin.Thor>
The ancient archives of Thu, 22 Feb 2001 20:25:56 +0100 showed
snef of comp.lang.perl.misc speaking thus:
>Hi!
>
>I want to make a simple substitution.
>
>I need te replace all accented characters (ö é .....) to their 'normal'
>characters.
>I wrote a little program in Windows with this line in it:
>
>$sometext =~ s/{ö|ó|ò|õ}/o/ig;
>
>When I run it on a windows machine this will give the wanted result, but
>when I run this on a linux machine it fails....
>It has got something to do with a character set or so?
>
>Can please somebody help me?????
The easiest way I've found for getting around problems with the
"high-ASCII" characters is to use their octal values:
tr/[\302-\306]/o/;
This is also quite a bit faster than s///.
Ben Okopnik
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
"I support efforts to limit the terms of members of Congress, especially
members of the House and members of the Senate." -- Dan Quayle
------------------------------
Date: Sat, 24 Feb 2001 04:16:40 GMT
From: "Tom" <tom@hotversion.com>
Subject: re-post / re- direct help needed
Message-Id: <IAGl6.15088$BU4.25238@news1.blktn1.nsw.optushome.com.au>
hi guys
The machine at work is running filemaker pro which does not support cgi-bin
and does not support file upload! so what I did is setup apache on the same
server but on a different port.. so the user posts this one form to my perl
script which will do the upload and then repost it to filemakerpro for its
database work. the question is how do I re-post the form from perl to
<script unknown> ?
I've thought of tying everything into a get format and redirecting it to
the application but at the moment its setup for post.. and so I'm not
confident get will work.
thanks guys.
Tom
------------------------------
Date: Sat, 24 Feb 2001 04:58:23 GMT
From: David Bakhash <cadet@alum.mit.edu>
Subject: simple question on array splice hack
Message-Id: <m37l2hzdgb.fsf@alum.mit.edu>
hi,
this is really easy, but for some odd reason I blanked on a simple
one-liner to do this:
I have an array of hashrefs. each hashref in the array has a field
which is either defined() or undefined. At most one of the hashrefs
will have this field as defined. What's the simplest way to move that
guy to the front (i.e. index 0) of the array?
thanks,
dave
------------------------------
Date: Sat, 24 Feb 2001 05:54:24 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: simple question on array splice hack
Message-Id: <x7y9uwhbhq.fsf@home.sysarch.com>
>>>>> "DB" == David Bakhash <cadet@alum.mit.edu> writes:
DB> I have an array of hashrefs. each hashref in the array has a
DB> field which is either defined() or undefined. At most one of the
DB> hashrefs will have this field as defined. What's the simplest way
DB> to move that guy to the front (i.e. index 0) of the array?
this should do it. dunno about making a real oneliner. also you need to
be careful about whether you mean defined or true. the ||= looks at
truth. also do you really mean defined or exists?
my $first ;
@new = grep { ! defined( $first ||= $_->{'field'} ) } @old ;
unshift @new, $first ;
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: 24 Feb 2001 05:49:03 GMT
From: anotherway83@aol.com (The Mosquito ScriptKiddiot)
Subject: SMTP server
Message-Id: <20010224004903.03325.00002741@ng-cg1.aol.com>
hey
sorry if this mite sound off-topic, but i haven't been able to find a decent
SMTP server...i've looked all over, meaning i've searched using search engines,
and it's true that MANY so-called "valid" hits r returned...sites that
literally contain lists of what they call "free" smtp servers, but when u try
them, they're all fake...the ones that work say stuff like "relaying
denied"....
i did find one that accepted : chem.boisestate.edu
BUT
it NEVER sent the email to the intended recipient
so now, the $64,000 question is....
WHERE CAN I FIND A FREE GOOD SMTP SERVER?
thanks
peace
The Mosquito ScriptKiddiot
Championing the Cause of Mosquitoes in Technology
------------------------------
Date: Sat, 24 Feb 2001 05:59:46 GMT
From: Uri Guttman <uri@sysarch.com>
Subject: Re: SMTP server
Message-Id: <x7u25khb8s.fsf@home.sysarch.com>
>>>>> "TMS" == The Mosquito ScriptKiddiot <anotherway83@aol.com> writes:
TMS> sorry if this mite sound off-topic, but i haven't been able to
TMS> find a decent SMTP server...i've looked all over, meaning i've
TMS> searched using search engines, and it's true that MANY so-called
TMS> "valid" hits r returned...sites that literally contain lists of
TMS> what they call "free" smtp servers, but when u try them, they're
TMS> all fake...the ones that work say stuff like "relaying
TMS> denied"....
why apologize? this group is all about stealing smtp servers for use by
spammer and kiddies. keep posting here and you will get dozens of open
smtp servers.
TMS> so now, the $64,000 question is....
so pay me $64k and i will help.
TMS> WHERE CAN I FIND A FREE GOOD SMTP SERVER?
well, do you want free or one that costs $64k? make up your mind?
TMS> The Mosquito ScriptKiddiot
^^^^^^
how true.
now, FOAD.
uri
--
Uri Guttman --------- uri@sysarch.com ---------- http://www.sysarch.com
SYStems ARCHitecture, Software Engineering, Perl, Internet, UNIX Consulting
The Perl Books Page ----------- http://www.sysarch.com/cgi-bin/perl_books
The Best Search Engine on the Net ---------- http://www.northernlight.com
------------------------------
Date: Fri, 23 Feb 2001 22:12:27 -0800
From: "Godzilla!" <godzilla@stomp.stomp.tokyo>
Subject: Re: SMTP server
Message-Id: <3A9750CB.ADC9C701@stomp.stomp.tokyo>
The Mosquito ScriptKiddiot wrote:
(snippage)
> WHERE CAN I FIND A FREE GOOD SMTP SERVER?
Why not ask your friends over in alt.hacking?
All of you seem a close knit friendly lot.
Godzilla!
------------------------------
Date: 24 Feb 2001 07:06:11 GMT
From: anotherway83@aol.com (The Mosquito ScriptKiddiot)
Subject: Re: SMTP server
Message-Id: <20010224020611.03850.00005257@ng-mi1.aol.com>
lol...lemme clarify
im not a scriptkiddiot, nor a hacker, nor a computer elite...
i picked the name "mosquito scriptkiddiot" cos it sounds funny...mosquitoes at
a computer trying to hack away...
i still need to find sum smtp servers....
please suggest sum...
thx
peace
The Mosquito ScriptKiddiot
Championing the Cause of Mosquitoes in Technology
------------------------------
Date: Sat, 24 Feb 2001 07:38:22 GMT
From: tjla@guvfybir.qlaqaf.bet (Gwyn Judd)
Subject: Re: SMTP server
Message-Id: <slrn99ep7c.u5n.tjla@thislove.dyndns.org>
I was shocked! How could The Mosquito ScriptKiddiot <anotherway83@aol.com>
say such a terrible thing:
>i still need to find sum smtp servers....
>
>please suggest sum...
Well at the risk of starting a flame-war, I like sendmail. I'm sure
someone else will come along and recommed qmail or one of the others. On
the other hand, if you are looking for someone's unsecured machine to
relay-rape then keep looking because I won't tell you where on the net
the lists of open relay machines are. Why don't you just use your own
ISP's machine if your intentions really are noble? And what the hell has
this to do with Perl anyway?
--
Gwyn Judd (print `echo 'tjla@guvfybir.qlaqaf.bet' | rot13`)
"Some people need to fill their lives with explanations, and they don't care
if they are true of not - religions, being the MAJOR example!" --Pontus Berg
------------------------------
Date: Sat, 24 Feb 2001 02:46:33 +0000 (UTC)
From: efflandt@xnet.com (David Efflandt)
Subject: Re: submit formbox to perlscript
Message-Id: <slrn99e840.ard.efflandt@efflandt.xnet.com>
On Fri, 23 Feb 2001, Florian Handle <florian.handle@chello.at> wrote:
>How can I submit a form (by clicking the submitbutton) to a Perlscript and
>write the value of a formbox into a textfile. The site shouldn't change if
>this is possible.
You should normally ask this on a *.cgi newsgroup, but it seems to be dead
at the moment.
On a system with Perl on it type: perldoc CGI
For info about opening a file to save data to: perldoc -f open
--
David Efflandt efflandt@xnet.com http://www.de-srv.com/
http://www.autox.chicago.il.us/ http://www.berniesfloral.net/
http://cgi-help.virtualave.net/ http://hammer.prohosting.com/~cgi-wiz/
------------------------------
Date: Sat, 24 Feb 2001 06:14:14 GMT
From: "Bret Tucker" <Bret.Tucker@home.com>
Subject: Variable Cross Reference Listing
Message-Id: <WiIl6.5732$jg1.305793@news1.alsv1.occa.home.com>
Is there any way to get a cross-reference listing of variables in a Perl
program?
Specifically, for all program variables:
a. those that are declared but unused
b. those that are declared and where they are used in the program according
to the line number(s) in the program
Any help greatly appreciated,
Bret
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 99)
Message-Id: <null>
Administrivia:
The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc. For subscription or unsubscription requests, send
the single line:
subscribe perl-users
or:
unsubscribe perl-users
to almanac@ruby.oce.orst.edu.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
To request back copies (available for a week or so), send your request
to almanac@ruby.oce.orst.edu with the command "send perl-users x.y",
where x is the volume number and y is the issue number.
For other requests pertaining to the digest, send mail to
perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
sending perl questions to the -request address, I don't have time to
answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V10 Issue 347
**************************************
