[27271] in Perl-Users-Digest
Perl-Users Digest, Issue: 9029 Volume: 10
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Mar 8 11:05:51 2006
Date: Wed, 8 Mar 2006 08:05:06 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 8 Mar 2006 Volume: 10 Number: 9029
Today's topics:
Re: A Problem With GD <zen13097@zen.co.uk>
Perl scrpit to reschedule AT command? <dave@powerup.com.au>
Re: Perl scrpit to reschedule AT command? <michael@thegrebs.com>
Re: Perl scrpit to reschedule AT command? <tadmc@augustmail.com>
Re: Perl scrpit to reschedule AT command? <dave@powerup.com.au>
Regex - need help! <disco@interia.pl>
Re: Regex - need help! <josef.moellers@fujitsu-siemens.com>
Re: Regex - need help! <disco@interia.pl>
Re: Regex - need help! <1usa@llenroc.ude.invalid>
Re: Regex - need help! <disco@interia.pl>
Re: Regex - need help! <josef.moellers@fujitsu-siemens.com>
Re: Regex - need help! <disco@interia.pl>
Re: Regex - need help! <tadmc@augustmail.com>
Re: Regex - need help! <josef.moellers@fujitsu-siemens.com>
Re: Regex - need help! <rm@biteme.org>
Re: Regex - need help! <rm@biteme.org>
Re: Regex - need help! <kkeller-usenet@wombat.san-francisco.ca.us>
Re: Regex - need help! <tadmc@augustmail.com>
Re: Regex - need help! <1usa@llenroc.ude.invalid>
Re: Ronald Matthews ... some not so good news <josef.moellers@fujitsu-siemens.com>
Re: Ronald Matthews ... some not so good news <rm@biteme.org>
Re: Ronald Matthews <rm@biteme.org>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 08 Mar 2006 09:48:24 GMT
From: Dave Weaver <zen13097@zen.co.uk>
Subject: Re: A Problem With GD
Message-Id: <440ea868$0$29576$da0feed9@news.zen.co.uk>
Finally, some Perl content in this thread!
Mark Manning <markem@airmail.net> wrote:
> Is
>
> for( $i=0; $i<10; $i++ )...
>
> any better than
>
> $i=-1;
> while( $i++ < 10 )...
>
> any worse?
They don't do the same thing.
> Which is correct?
It depends whether you want to count from 0..9 or 0..10
The best way is
for my $i (0 .. 9) { # or (0..10), depending...
...
}
------------------------------
Date: Wed, 08 Mar 2006 21:51:53 +1000
From: Dave <dave@powerup.com.au>
Subject: Perl scrpit to reschedule AT command?
Message-Id: <6ggt02lu74d7u7c8bemfm39ou2hv1939hp@4ax.com>
Hi
I once saw a perl script that was able to reschedule the AT command
but am unable to find it.
I am not able to use the language myself and would appreciate a rehit
of the script please, or a pointer to where I could likely find it.
Using a cron would be best but I haven't the rights to use it and wish
to trial a run with the At command first before getting someone to set
up a cron job. Am using the at command to run sqlplus script on
oracle 10. Also do not wish to use the scheduling facility in Oracle
this time.
Thanks
Dave.
------------------------------
Date: Wed, 8 Mar 2006 06:33:56 -0600
From: Michael Greb <michael@thegrebs.com>
Subject: Re: Perl scrpit to reschedule AT command?
Message-Id: <slrne0tjod.j5k.michael@orion.thegrebs.com>
On 2006-03-08, Dave <dave@powerup.com.au> wrote:
> Hi
> I once saw a perl script that was able to reschedule the AT command
> but am unable to find it.
> I am not able to use the language myself and would appreciate a rehit
> of the script please, or a pointer to where I could likely find it.
> Using a cron would be best but I haven't the rights to use it and wish
> to trial a run with the At command first before getting someone to set
> up a cron job. Am using the at command to run sqlplus script on
> oracle 10. Also do not wish to use the scheduling facility in Oracle
> this time.
> Thanks
> Dave.
From your post I have no idea what you are trying to do. You might try
posting a description of exactly what you are trying to do and what you
have tried.
--
Michael
michael@thegrebs.com
SpamStats: http://spam.thegrebs.com
------------------------------
Date: Wed, 8 Mar 2006 07:16:05 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Perl scrpit to reschedule AT command?
Message-Id: <slrne0tm8l.3q6.tadmc@magna.augustmail.com>
Dave <dave@powerup.com.au> wrote:
> I am not able to use the language myself
Why not?
> Also do not wish to use the scheduling facility in Oracle
Why do you not wish to use the scheduling facility in Oracle?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Thu, 09 Mar 2006 01:11:31 +1000
From: Dave <dave@powerup.com.au>
Subject: Re: Perl scrpit to reschedule AT command?
Message-Id: <n0st02dgrg2inqkt708foffour4s33kqp0@4ax.com>
On 2006-03-08, Dave <dave@powerup.com.au> wrote:
> Hi
> I once saw a perl script that was able to reschedule the AT command
> but am unable to find it.
> I am not able to use the language myself and would appreciate a rehit
> of the script please, or a pointer to where I could likely find it.
> Using a cron would be best but I haven't the rights to use it and wish
> to trial a run with the At command first before getting someone to set
> up a cron job. Am using the at command to run sqlplus script on
> oracle 10. Also do not wish to use the scheduling facility in Oracle
> this time.
> Thanks
> Dave.
On Wed, 8 Mar 2006 07:16:05 -0600, Tad McClellan
<tadmc@augustmail.com> wrote:
>Dave <dave@powerup.com.au> wrote:
>
>> I am not able to use the language myself
>
>Why not?
>
too old, lazy, busy to learn for now but wish to have a go in the
future. Just meddling for now. apologies.
>> Also do not wish to use the scheduling facility in Oracle
>
>
>Why do you not wish to use the scheduling facility in Oracle?
Database Admin has concern with dbms_scheduler or with me using it and
suggest I use the unix at command to schedule a job. That's fine but
as the unix at command only runs once I would prefer to run the perl
script ( a rather simple script that I took a fancy to, but lost)
which would run the unix at command and then resubmit the at command
to run again tomorrow. I am not trying to bypass Sys Admin advice, but
testing a script first for a while to iron out problems before
possibly requesting a cron job be set up later.
Dave
------------------------------
Date: Wed, 08 Mar 2006 13:17:00 +0100
From: dutch disCo <disco@interia.pl>
Subject: Regex - need help!
Message-Id: <dumi00$sdm$1@opal.futuro.pl>
Hi all,
the case seems to be easy-to-solve, but since I'm kind of new to perl I
have no idea how to cope:
I run:
find . -name "index.html"
which results in something like this:
./0223/html/index.html
./0357/html/index.html
and so forth.
Now, I want these lines to become:
<a href="./0223/html/index.html">./0223/html/index.html</a>
<a href="./0357/html/index.html">./0357/html/index.html</a>
respectively, and store the modified results in a file.
How to do this?
Any help appreciated
Best regards
dd
------------------------------
Date: Wed, 08 Mar 2006 13:17:50 +0100
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: Regex - need help!
Message-Id: <dumi8i$8pt$1@nntp.fujitsu-siemens.com>
dutch disCo wrote:
> Hi all,
>=20
> the case seems to be easy-to-solve, but since I'm kind of new to perl I=
=20
> have no idea how to cope:
>=20
> I run:
>=20
> find . -name "index.html"
>=20
> which results in something like this:
>=20
> ./0223/html/index.html
> ./0357/html/index.html
>=20
> and so forth.
>=20
> Now, I want these lines to become:
>=20
> <a href=3D"./0223/html/index.html">./0223/html/index.html</a>
> <a href=3D"./0357/html/index.html">./0357/html/index.html</a>
@modified =3D map { '<a href=3D"' . $_ . '">' . $_ . '</a>' } @lines;
> respectively, and store the modified results in a file.
# Assuming $file is a file handle reference.
print $file join("\n", @modified), "\n";
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Wed, 08 Mar 2006 13:52:01 +0100
From: dutch disCo <disco@interia.pl>
Subject: Re: Regex - need help!
Message-Id: <dumk1o$tbu$1@opal.futuro.pl>
Josef Moellers schrieb:
> @modified = map { '<a href="' . $_ . '">' . $_ . '</a>' } @lines;
>
>> respectively, and store the modified results in a file.
>
> # Assuming $file is a file handle reference.
> print $file join("\n", @modified), "\n";
Sorry, too rookie to use this. Could you please provide the whole script
entries?
Best regards
dd
------------------------------
Date: Wed, 08 Mar 2006 13:04:47 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: Regex - need help!
Message-Id: <Xns9780524C8DE9Fasu1cornelledu@127.0.0.1>
dutch disCo <disco@interia.pl> wrote in
news:dumk1o$tbu$1@opal.futuro.pl:
> Josef Moellers schrieb:
>> @modified = map { '<a href="' . $_ . '">' . $_ . '</a>' } @lines;
>>
>>> respectively, and store the modified results in a file.
>>
>> # Assuming $file is a file handle reference.
>> print $file join("\n", @modified), "\n";
>
> Sorry, too rookie to use this. Could you please provide the whole
> script entries?
Have you seen the posting guidelines for this group?
Sinan
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(reverse each component and remove .invalid for email address)
comp.lang.perl.misc guidelines on the WWW:
http://mail.augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html
------------------------------
Date: Wed, 08 Mar 2006 14:20:19 +0100
From: dutch disCo <disco@interia.pl>
Subject: Re: Regex - need help!
Message-Id: <dumlmh$tt6$1@opal.futuro.pl>
A. Sinan Unur schrieb:
> Have you seen the posting guidelines for this group?
I know, I know. Sorry for that.
Please do go private if you're still willing to help:
dutchdisco /at/ postmaster /dot/ co \dot\ uk
Please replace unneeded characters as appropriate.
Best regards
dd
------------------------------
Date: Wed, 08 Mar 2006 14:24:24 +0100
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: Regex - need help!
Message-Id: <dumm67$lud$1@nntp.fujitsu-siemens.com>
dutch disCo wrote:
> Josef Moellers schrieb:
>=20
>> @modified =3D map { '<a href=3D"' . $_ . '">' . $_ . '</a>' } @lines;
>>
>>> respectively, and store the modified results in a file.
>>
>>
>> # Assuming $file is a file handle reference.
>> print $file join("\n", @modified), "\n";
>=20
>=20
> Sorry, too rookie to use this. Could you please provide the whole scrip=
t=20
> entries?
You mean, I should write the script for you?
Why not try yourself? You may learn something.
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Wed, 08 Mar 2006 14:55:49 +0100
From: dutch disCo <disco@interia.pl>
Subject: Re: Regex - need help!
Message-Id: <dumnp3$uvu$1@opal.futuro.pl>
> You mean, I should write the script for you?
For this time, yes.
> Why not try yourself? You may learn something.
I will, I promise. Only that I'm at work at the moment, it's hectic and
I urgently need this script.
Sincerely
dd
------------------------------
Date: Wed, 8 Mar 2006 07:12:27 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Regex - need help!
Message-Id: <slrne0tm1r.3q6.tadmc@magna.augustmail.com>
dutch disCo <disco@interia.pl> wrote:
> Subject: Re: Regex - need help!
Your post has nothing to do with regular expressions.
> but since I'm kind of new to perl I
> have no idea how to cope:
>
> I run:
>
> find . -name "index.html"
perldoc -q external
How can I capture STDERR from an external command?
There are three basic ways of running external commands: ...
> Now, I want these lines to become:
>
><a href="./0223/html/index.html">./0223/html/index.html</a>
><a href="./0357/html/index.html">./0357/html/index.html</a>
Use interpolation in a double quotish string ("Quote and Quote-like Operators"
in perlop.pod) or the concatenation operator (also in perlop.pod).
> and store the modified results in a file.
perldoc -f open
perldoc -f print
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 08 Mar 2006 15:03:41 +0100
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: Regex - need help!
Message-Id: <dumogb$tti$1@nntp.fujitsu-siemens.com>
dutch disCo wrote:
>> You mean, I should write the script for you?
>=20
> For this time, yes.
>=20
>> Why not try yourself? You may learn something.
>=20
> I will, I promise. Only that I'm at work at the moment,
So am I.
> I urgently need this script.
I'm sorry,
Josef
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Wed, 08 Mar 2006 14:21:40 GMT
From: Ronald Matthews <rm@biteme.org>
Subject: Re: Regex - need help!
Message-Id: <ULBPf.13072$Qh1.77993@news20.bellglobal.com>
A. Sinan Unur <1usa@llenroc.ude.invalid> trolled:
> dutch disCo <disco@interia.pl> wrote in
> > Josef Moellers schrieb:
> >> @modified = map { '<a href="' . $_ . '">' . $_ . '</a>' }
> >> @lines;
> >>
> >>> respectively, and store the modified results in a file.
> >>
> >> # Assuming $file is a file handle reference. print $file
> >> join("\n", @modified), "\n";
> >
> > Sorry, too rookie to use this. Could you please provide the
> > whole script entries?
> Have you seen the posting guidelines for this group?
The "posting guidelines" are irrelevant to the question asked.
cordially, as always,
rm
------------------------------
Date: Wed, 08 Mar 2006 14:22:44 GMT
From: Ronald Matthews <rm@biteme.org>
Subject: Re: Regex - need help!
Message-Id: <UMBPf.13095$Qh1.77876@news20.bellglobal.com>
dutch disCo <disco@interia.pl> trolled:
> A. Sinan Unur schrieb:
> > Have you seen the posting guidelines for this group?
> I know, I know. Sorry for that.
Do _not_ apologize to troll A. Sinan Unur. The "A" is for Anal.
cordially, as always,
rm
------------------------------
Date: Wed, 8 Mar 2006 07:03:11 -0800
From: Keith Keller <kkeller-usenet@wombat.san-francisco.ca.us>
Subject: Re: Regex - need help!
Message-Id: <ia83e3xe79.ln2@goaway.wombat.san-francisco.ca.us>
On 2006-03-08, dutch disCo <disco@interia.pl> wrote:
>> You mean, I should write the script for you?
> For this time, yes.
If you're looking for someone to write your script, then presumably
you're willing to pay him, in which case visit http://jobs.perl.org .
--keith
--
kkeller-usenet@wombat.san-francisco.ca.us
(try just my userid to email me)
AOLSFAQ=http://wombat.san-francisco.ca.us/cgi-bin/fom
see X- headers for PGP signature information
------------------------------
Date: Wed, 8 Mar 2006 09:21:48 -0600
From: Tad McClellan <tadmc@augustmail.com>
Subject: Re: Regex - need help!
Message-Id: <slrne0ttkc.4e6.tadmc@magna.augustmail.com>
dutch disCo <disco@interia.pl> wrote:
>> You mean, I should write the script for you?
> For this time, yes.
> I urgently need this script.
How much does the job pay?
--
Tad McClellan SGML consulting
tadmc@augustmail.com Perl programming
Fort Worth, Texas
------------------------------
Date: Wed, 08 Mar 2006 15:37:13 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: Regex - need help!
Message-Id: <Xns97806C24B67FBasu1cornelledu@127.0.0.1>
dutch disCo <disco@interia.pl> wrote in news:dumlmh$tt6$1
@opal.futuro.pl:
> A. Sinan Unur schrieb:
>> Have you seen the posting guidelines for this group?
>
> I know, I know. Sorry for that.
> Please do go private if you're still willing to help:
I am willing to help, but not as a consultant. Answers provided on this
forum provide help to more than just the original poster: A well posed
question with an appropriate subject line allows people with similar
problems to locate the solution with a simple search. That is why I do
not answer questions by private email unless you are offering me a
lucrative consulting opportunity.
Here's something to ponder for everyone who wants urgent answers to be
provided to vague questions: What is the benefit to me of participating
in comp.lang.perl.misc?
Sadly, I do not share many genes with Mother Theresa. So, your happiness
is not my end. On the other hand, a well posed question where the poster
has given some thought stimulates my Perl neurons, gets me thinking, and
helps me more.
Even when I do not know about a topic to be able to provide an answer,
when a good discussion gets going about the finer points of programming,
I learn from that just by following the exchange.
There is nothing I can learn from a "write my script for me" post. In
fact, a lot of the people who regularly answer questions on clpm feel
the same way. That is why the posting guidelines recommend that you at
least make an attempt to solve your problem.
If the group gets flooded with "write me this", "write me that" kind of
requests (and believe you me, if we started answering each such post,
there would be a flood), then there would be no benefit to me from
participating in the group. Similarly for other whose expertise I trust
will catch my errors.
Now, this does not prevent anyone else from helping you if they so wish.
I just wanted to clarify to you why you will get much more help if you
put some effort into your post.
Sinan
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(reverse each component and remove .invalid for email address)
comp.lang.perl.misc guidelines on the WWW:
http://mail.augustmail.com/~tadmc/clpmisc/clpmisc_guidelines.html
------------------------------
Date: Wed, 08 Mar 2006 14:39:59 +0100
From: Josef Moellers <josef.moellers@fujitsu-siemens.com>
Subject: Re: Ronald Matthews ... some not so good news
Message-Id: <dumn3k$p40$1@nntp.fujitsu-siemens.com>
Josef Moellers wrote:
Here's a reply of the person who shared some information about Ronald=20
with us:
> ----------------------------------------------------------------------
I don't read rsbb anymore, and haven't for six or seven years.. I just
checked it yesterday after seeinh him in clpm. I would imagine that he
has had lots of complaints to his ISP over the years. The fact that
he's still online tells me that he stays just barely short of the line
at which they'll terminate him.
> ----------------------------------------------------------------------
Now this is bad news.
However, maybe we can sort this out ourselves:
> I'd like to encourage everyone who feels annoyed about Ronald to=20
> send an abuse complaint to the address in Ronald's message headers.=20
> Let symtpatico decide how to handle this and let's hope for the best.
>=20
> And ... please ignore him.
Josef
--=20
Josef M=F6llers (Pinguinpfleger bei FSC)
If failure had no penalty success would not be a prize
-- T. Pratchett
------------------------------
Date: Wed, 08 Mar 2006 14:25:16 GMT
From: Ronald Matthews <rm@biteme.org>
Subject: Re: Ronald Matthews ... some not so good news
Message-Id: <gPBPf.13145$Qh1.78027@news20.bellglobal.com>
Josef Moellers <josef.moellers@fujitsu-siemens.com> trolled:
> Josef Moellers wrote:
> Here's a reply of the person who shared some information about Ronald
> with us:
> > ----------------------------------------------------------------------
> I don't read rsbb anymore, and haven't for six or seven years.. I just
> checked it yesterday after seeinh him in clpm. I would imagine that he
> has had lots of complaints to his ISP over the years. The fact that
> he's still online tells me that he stays just barely short of the line
> at which they'll terminate him.
> > ----------------------------------------------------------------------
> Now this is bad news.
Isn't it though? Somebody who will stand up and challenge your anal
bullying...
Oh, no, girls! What are we going to do?
Start treating new posters with respect, instead of orders, and we
will be content to watch.
cordially, as always,
rm
------------------------------
Date: Wed, 08 Mar 2006 09:04:44 GMT
From: Ronald Matthews <rm@biteme.org>
Subject: Re: Ronald Matthews
Message-Id: <M6xPf.5162$Qh1.71078@news20.bellglobal.com>
Josef Moellers <josef.moellers@fujitsu-siemens.com> trolled:
> For the information of those feeling annoyed by this person.
But not for the great number who are not annoyed?
> I received a PM today of a person who shared the following information
> with me:
Care to share his name?
> I've only been reading comp.lang.perl.misc for a few days now, but
> it seems to me that rlm is new there also. I used to read the
> cesspit that is rec.sport.baseball. For a hint as to what this guy
> is like, try googling rec.sport.baseball & author "realto
> margarino" or "Roger mother". (He posted as Roger Lustig's Mother,
> but google doesn't like that, for some reason).
> He is still posting to rsbb, merrily defecating directly on
> people's faces all the day. Seriously, this guy is a nut case.
> What he's now doing in clpm, he's been doing in rsbb for at least
> 10 years. I haven't been reading the group long enough to decide
> whetheror not to post this info, so I picked you pretty much at
> random to let you decide what to post.
Think you can handle ten years over here?
> I have not yet found out why the people at rsbb have put of with
> this person for 10 years.
I am probably the most read person in that group.
> I'd like to encourage everyone who feels annoyed about this person
> to send an abuse complaint to the address in this person's message
> headers. Let symtpatico decide how to handle this and let's hope
> for the best.
Dear Sympatico:
This person annoys me. Could you please cancel his account?
Thank you.
JM.
Nope, I don't think so, Joey.
> And ... please ignore him.
And that is what you are doing here, right?
cordially, as always,
rm
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
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: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 9029
***************************************
