I tried to send an email to [EMAIL PROTECTED] and it seems like the Optushome
Postmaster denied it ... read on ..
Actually .. i'll be suprised if this gets through
Regards, Matt
---------- Forwarded Message ----------
Subject: Sorry, spam is not accepted here
Date: Thu, 6 Jul 2000 16:18:34 +1000
From: <>
Your message with the subject:
"Re: [SLUG] Running every 60 seconds"
contains material that is deemed to be spam by the server owner. In
order to prevent the flooding of inboxes at this server with
unsolicited emails including advertising and marketing schemes
(Pyramid/MLM), you are not allowed to send spam to any users here.
Your email has been deleted and will not be delivered to the intended
recipients.
Spam is unwanted by the vast majority of the internet community, and
should you persist in sending unsolicited emails to any users of this
server, a letter of complaint will be directed to your hosting provider
and their upstream provider. The sending of unsolicited email is
expressly forbidden by most internet providers, and sending such email
will usually result in an immediate removal of your account.
If you have any questions regarding this email, please contact:
[EMAIL PROTECTED]
Postmaster
-----
Return-path: <[EMAIL PROTECTED]>
Received: from bigfoot.com (208.156.39.206) by aussie.mine.nu (no UCE/UBE) .
(Mercury/32 v3.01a) ID MG000121;
6 Jul 00 16:17:39 +1000
Received: from bclass.spectrum.com.au ([203.101.23.85])
by BFLITEMAIL6.bigfoot.com (LiteMail v2.43(BFLITEMAIL6)) with SMTP id
06Jul2000_BFLITEMAIL6_46654_50830075;
Thu, 06 Jul 2000 02:19:53 -0400 EST
Received: from newtreno.spectrum.com.au (IDENT:[EMAIL PROTECTED]
[203.14.108.66])
by bclass.spectrum.com.au (8.9.3/8.8.7) with ESMTP id QAA02265;
Thu, 6 Jul 2000 16:09:12 +1000
Received: from localhost (mail@localhost)
by newtreno.spectrum.com.au (8.9.3/8.9.3) with SMTP id QAA29120;
Thu, 6 Jul 2000 16:09:10 +1000
Received: by newtreno.spectrum.com.au (bulk_mailer v1.9); Thu, 6 Jul 2000 16:09:06
+1000
Received: (from majordomo@localhost)
by newtreno.spectrum.com.au (8.9.3/8.9.3) id QAA29106
for slug-outgoing; Thu, 6 Jul 2000 16:09:04 +1000
X-Authentication-Warning: newtreno.spectrum.com.au: majordomo set sender to
[EMAIL PROTECTED] using -f
From: Matt <[EMAIL PROTECTED]>
To: Alexander Else <[EMAIL PROTECTED]>
Subject: Re: [SLUG] Running every 60 seconds
Date: Fri, 7 Jul 2000 03:59:52 +1000
X-Mailer: KMail [version 1.0.28]
Content-Type: text/plain
References: <[EMAIL PROTECTED]>
<[EMAIL PROTECTED]>
<[EMAIL PROTECTED]>
In-Reply-To: <[EMAIL PROTECTED]>
Cc: [EMAIL PROTECTED]
MIME-Version: 1.0
Message-Id: <[EMAIL PROTECTED]>
Content-Transfer-Encoding: 8bit
Sender: [EMAIL PROTECTED]
It's really not that important .. I now run ./perlgo & which runs my
perl script that sleeps for 60 seconds and then runs a shell script that runs
lynx and ncftpput to update the page (it does what ?):
http://members.optushome.com.au/kozer/
(check it out, it has the time there too, heh)
I mentioned the code for this before but I can send it to anyone that wants it
Because my connection is fast and fortune/ncftpput only take half a second
things work out just great. I could of course add all these system stats such
as uptimes/memory etc but I reakon that's pushing it (my uptimes suck anyway
cause I need Windows every so often)
Thanks anyway ! It looks like you've read thru a shell scriping book or
something ?! GEE ! : )
Regards, Matt
On Thu, 06 Jul 2000, you wrote: > That'll execute code and
sleep for 60 seconds every time. Supposing it > takes 10 seconds for your
program to do its funky thang, that's 70 seconds > for each run. The fork
doesn't seem to be too helpful in this one, you > might as well just
background when you execute the script :) If you wanted > to get into some of
that funky forking action you could try something like; > > $SIG{CHLD} =
'IGNORE'; > while(!$finished) {
> sleep(60);
> if(!defined($pid=fork())) {
> die "Cannot fork: $!\n";
> } elsif(!$pid) {
> $finished=1;
> # do whatever it is you want
> }
> }
>
> Every 60 seconds you get an extra process which performs your task once,
> and then dies. The original will stay attached to your shell the whole while.
>
> Alexander.
>
>
> > > On Thu, 06 Jul 2000, you wrote:
> > > > #!/usr/bin/perl
> > > >
> > > > fork(&myprog) && die;
> > > >
> > > > sub myprog {
> > > >
> > > > while (1 = 1) {
> > > >
> > > > ...
> > > > ....
> > > > ....
> > > >
> > > > sleep(60);
> > > >
> > > > };
> > > >
> > > > };
>
> --
> SLUG - Sydney Linux Users Group Mailing List - http://www.slug.org.au
> To unsubscribe send email to [EMAIL PROTECTED] with
> unsubscribe in the text
--
SLUG - Sydney Linux Users Group Mailing List - http://www.slug.org.au
To unsubscribe send email to [EMAIL PROTECTED] with
unsubscribe in the text
unsubscribe in the text
-------------------------------------------------------
--
SLUG - Sydney Linux Users Group Mailing List - http://www.slug.org.au
To unsubscribe send email to [EMAIL PROTECTED] with
unsubscribe in the text
