[29690] in Perl-Users-Digest
Perl-Users Digest, Issue: 934 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Oct 13 16:09:55 2007
Date: Sat, 13 Oct 2007 13:09:08 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Sat, 13 Oct 2007 Volume: 11 Number: 934
Today's topics:
Re: a nice little perl utility and a minimal nntp clien <bik.mido@tiscalinet.it>
Re: a nice little perl utility <bik.mido@tiscalinet.it>
Re: a nice little perl utility <bik.mido@tiscalinet.it>
Re: a nice little perl utility <bik.mido@tiscalinet.it>
Re: a nice little perl utility (Doug Miller)
Re: a nice little perl utility QoS@domain.invalid
Re: a nice little perl utility <1usa@llenroc.ude.invalid>
Re: a nice little perl utility <ben@morrow.me.uk>
How to set DBI connection timeout for Win32 Perl->MySQL <whyleyc@gmail.com>
Re: How to set DBI connection timeout for Win32 Perl->M <ben@morrow.me.uk>
Re: optimal vs. optimized [was: Re: string concatentati <gre11100@gmail.com>
Re: optimal vs. optimized [was: Re: string concatentati <mambuhl@earthlink.net>
Re: quotes difference in Perl5.6 vs 5.8 <ben@morrow.me.uk>
Wholesale all NIKE.shox.Air max.AF1.TN.Jordan.shoes.App <zhurenfu888@hotmail.com>
Re: Windows,ASSOC,FTYPE,.pl,.plx,.sh <anonymous@127.0.0.1>
Re: Windows,ASSOC,FTYPE,.pl,.plx,.sh <anonymous@127.0.0.1>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 13 Oct 2007 15:06:40 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: a nice little perl utility and a minimal nntp client
Message-Id: <img1h3ptfdoucppekph8l088j57q7gjg6g@4ax.com>
On Fri, 12 Oct 2007 16:13:57 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>## minimal nntp client
>## by Wade Ward
>## Contributors: Michele Dondi, Gunnar Hjalmarsson
Funny!
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sat, 13 Oct 2007 12:03:16 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: a nice little perl utility
Message-Id: <lq41h3dd1bdnlpgr99l3hcdfjjsbnpqpkk@4ax.com>
On Fri, 12 Oct 2007 11:31:33 -0700, Bill H <bill@ts1000.us> wrote:
>> Michele
>> --
>> {$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
>> (($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
>> .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
>> 256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
Did you need to quote the whole post .sig included?
>I solved this a long time ago on XP by just downloading the XP power
>toy that lets you right click on a folder and open command window
I have it. I've had it for ages. Funnily enough I thought it would
have been precious, but I've used it once or twice in a year. Point
is, unfortunately I don't like Exploder as a GUI shell and often
resort, however strange it may seem, to an old image viewer's file
browser instead, although admittedly each of them has some advantages
that the other one lacks. And opening a textual shell in the cwd is
fine but I miss a very fast keybinding (in case you wonder: yes, I
know 'bout the contextual menu key) to do so, but then I almost always
have some consoles opened anyway, and pressing cd doesn't doesn't hurt
either, especially now that Windows sports a half decent completion.
Seriously, I've often dreamt of and occasionally written about a
mythological beast that is a GUI file browser, along with a CLI
interface with a very fast way to switch between those modes which
will always run mostly in parallel except when you want to maximize
one at the expenses of the other...
Incidentally, I also installed the X-like virtual desktops powertoy,
but it does not come close to real X wm's facilities in this sense,
due to it being an afterthought. So its usability drops down to zero
for me and after a period of initial excitement it ended up unused,
even if it's still there. Under Xfce2, which is my preferred wm for
Linux now, I use virtual desktops all the time instead.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sat, 13 Oct 2007 12:11:10 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: a nice little perl utility
Message-Id: <2261h3h62nrjaaarud9nq36lu5et26fodh@4ax.com>
On Fri, 12 Oct 2007 11:48:14 -0700, h3xx <amphetamachine@gmail.com>
wrote:
>> You're assuming wrong that for all users the DOS windows will open in
>> that directory as you can set it to what you like. I, for one, set it
>> to C:\temp.
>Actually in Windows, if you have a bare batch file and you call it
>either from Explorer or the "Run..." prompt, it executes from the
>directory it's placed into. If you open the Properties dialog (right-
>click menu in Explorer) you can change its default working directory
>from there. Then all commands will execute relative to that directory.
What does this have to do with my claim? I'm talking about a
completely different thing, namely the directory a DOS console starts
into when you click on its damned little icon e.g. from the start
menu.
>> __END__
>This last line is unnecessary. You'll hardly EVER see it unless
>there's a data section below it, which I haven't seen but once.
So what? I still like as it clearly marks the end of the program: to
put it like $Larry did in one of his natural languages' principles in
Perl speeches, it's much like a "bye" - just as much as the shebang
line is a "hello". So it's part of my template for new perl files.
That it is unnecessary doesn't mean that it is not useful, if not for
anything else, if I *do* want to add a DATA section, or for ease of
reading when pasting especially in text based media like USENET.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sat, 13 Oct 2007 12:16:14 +0200
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: a nice little perl utility
Message-Id: <fe61h3h875jgp19btjts1crl9pfbgvd00e@4ax.com>
On Fri, 12 Oct 2007 14:44:20 -0700, "Wade Ward" <zaxfuuq@invalid.net>
wrote:
>> I'm ASTONISHED!! Why on hell do you need to do that?!?
>Here, on hell, I found myself doing the same things time and time again. It
>saves 35 keystrokes to get to where my command window has to be.
The point is, you should not need the 35 keystrokes in the first
place.
>> C:\temp>wjed merl.pl
>>
>> C:\temp>cat merl.pl
>How do you get perl.exe to interpret these commands. Is temp in a child
I don't. wjed is my text editor and cat a tiny utility, namely the
*NIX one, ported under Win32.
>directory?
\temp is a child directory of the root in my %HOMEDRIVE%.
>> #!/usr/bin/perl -l
>I take it, this is the appropriate shebang line for xp?
Any would do. I use this one since it will work both under Linux and
Windows. Of course under the latter it is not interpreted by the
kernel as under the former, but perl re-reads it anyway for switches,
so in this case uses -l.
>> C:\temp>merl crank
>> Merl iz a crank!
>>
>> C:\temp>merl
>> Merl iz a freak!
>I'll take that as a compliment.
You should take it as an example.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: Sat, 13 Oct 2007 11:20:24 GMT
From: spambait@milmac.com (Doug Miller)
Subject: Re: a nice little perl utility
Message-Id: <ET1Qi.6040$lE2.5017@newssvr22.news.prodigy.net>
In article <dJSdnfsYAdAAQZLanZ2dnUVZ_gqdnZ2d@comcast.com>, "Wade Ward" <zaxfuuq@invalid.net> wrote:
>No. My soln was to use cd .. to get to the root. Yours is obviously
>better. I had forgotten that dos syntax.
Note that "CD .." goes to the *parent* directory, not to the root.
"CD \" goes to the root.
>
>> C:\temp>wjed merl.pl
>>
>> C:\temp>cat merl.pl
>How do you get perl.exe to interpret these commands. Is temp in a child
>directory?
temp is clearly a directory under the root.
>
>> #!/usr/bin/perl -l
>I take it, this is the appropriate shebang line for xp?
That would be the appropriate shebang line for perl.
--
Regards,
Doug Miller (alphageek at milmac dot com)
It's time to throw all their damned tea in the harbor again.
------------------------------
Date: Sat, 13 Oct 2007 11:52:18 GMT
From: QoS@domain.invalid
Subject: Re: a nice little perl utility
Message-Id: <Sj2Qi.401$W22.260@trndny04>
spambait@milmac.com (Doug Miller) wrote in message-id: <ET1Qi.6040$lE2.5017@newssvr22.news.prodigy.net>
>
> In article <dJSdnfsYAdAAQZLanZ2dnUVZ_gqdnZ2d@comcast.com>, "Wade Ward" <zaxfuuq@invalid.net> wrote:
>
> >No. My soln was to use cd .. to get to the root. Yours is obviously
> >better. I had forgotten that dos syntax.
>
> Note that "CD .." goes to the *parent* directory, not to the root.
>
> "CD \" goes to the root.
> >
> >> C:\temp>wjed merl.pl
> >>
> >> C:\temp>cat merl.pl
> >How do you get perl.exe to interpret these commands. Is temp in a child
> >directory?
>
> temp is clearly a directory under the root.
> >
> >> #!/usr/bin/perl -l
> >I take it, this is the appropriate shebang line for xp?
>
> That would be the appropriate shebang line for perl.
>
Yeah, no; XP does not pay attention to shebang lines.
Now IMHO what would be 'a nice little perl utility' is one that teaches
XP to utilize the shebang line <g>.
------------------------------
Date: Sat, 13 Oct 2007 14:03:39 GMT
From: "A. Sinan Unur" <1usa@llenroc.ude.invalid>
Subject: Re: a nice little perl utility
Message-Id: <Xns99C866567FE32asu1cornelledu@127.0.0.1>
QoS@domain.invalid wrote in news:Sj2Qi.401$W22.260@trndny04:
>
> spambait@milmac.com (Doug Miller) wrote in message-id:
> <ET1Qi.6040$lE2.5017@newssvr22.news.prodigy.net>
>
>>
>> In article <dJSdnfsYAdAAQZLanZ2dnUVZ_gqdnZ2d@comcast.com>, "Wade
>> Ward" <zaxfuuq@invalid.net> wrote:
...
>> >> #!/usr/bin/perl -l
>> >I take it, this is the appropriate shebang line for xp?
>>
>> That would be the appropriate shebang line for perl.
>>
>
> Yeah, no; XP does not pay attention to shebang lines.
> Now IMHO what would be 'a nice little perl utility' is one that
> teaches XP to utilize the shebang line <g>.
That would indeed be an appropriate shebang line on XP. While Windows
does not use the shebang line to figure out how to run the script, perl
does pay attention to switches specified on that line.
In addition, it makes it easier to transfer scripts between Windows and
*nix machines. On most systems I have used, /usr/bin/perl was a link to
the system default perl so unless you need to use a specific local
version of perl using that shebang line works perfectly.
Sinan
--
A. Sinan Unur <1usa@llenroc.ude.invalid>
(remove .invalid and reverse each component for email address)
clpmisc guidelines: <URL:http://www.augustmail.com/~tadmc/clpmisc.shtml>
------------------------------
Date: Sat, 13 Oct 2007 19:06:14 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: a nice little perl utility
Message-Id: <m1e7u4-b81.ln1@osiris.mauzo.dyndns.org>
Quoth Michele Dondi <bik.mido@tiscalinet.it>:
> On Fri, 12 Oct 2007 11:48:14 -0700, h3xx <amphetamachine@gmail.com>
> wrote:
>
< snip Win32 stuff >
This thread has drifted away from Perl and into OS configuration issues.
May I suggest you take it elsewhere?
> >> __END__
> >This last line is unnecessary. You'll hardly EVER see it unless
> >there's a data section below it, which I haven't seen but once.
>
> So what? I still like as it clearly marks the end of the program: to
> put it like $Larry did in one of his natural languages' principles in
> Perl speeches, it's much like a "bye" - just as much as the shebang
> line is a "hello".
Actually he said, in the Camel Book IIRC, that '#!/usr/bin/perl' is
'Once upon a time...' and '__END__' is '...and they all lived happily
ever after.' :)
Ben
------------------------------
Date: Sat, 13 Oct 2007 15:44:23 -0000
From: roadrunner <whyleyc@gmail.com>
Subject: How to set DBI connection timeout for Win32 Perl->MySQL ?
Message-Id: <1192290263.498074.206600@q5g2000prf.googlegroups.com>
Hi,
I'm struggling to set a timeout value for a DB connection from Perl
DBI to MySQL on Win32. No matter what I try it always seems to default
to timing out after around 23 seconds (I'm testing to a machine which
is not responding to ping to simulate a network failure).
I've tried setting the "mysql_connect_timeout" value as below but this
seems to make no difference:
$dbh = DBI->connect("DBI:mysql:db_name:db_host:3306;mysql_connect_ti
+meout=5","username","password");
I've also tried wrapping the code block in an alarm as below, but
again this makes no difference (note the alarm function seems to work
fine when I test it with other commands):
eval {
local $SIG{ALRM} = sub { die "connect timeout\n" };
alarm 5;
$dbHandle = DBI->connect("DBI:mysql:db_name:db_host:3306","username
+","password") or die $DBI::errstr;
alarm 0;
};
if ($@) {
# Timed out
die unless $@ eq "connect timeout\n";
}
Can anyone either see any problems with this code or suggest
alternative ways of doing this ?
I'm using ActiveState Perl v5.8.8 (build 822) on Win32 with DBI v1.58
and DBD-MySQL v4.005
Thanks,
Roadrunner.
------------------------------
Date: Sat, 13 Oct 2007 19:22:56 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: How to set DBI connection timeout for Win32 Perl->MySQL ?
Message-Id: <01f7u4-b81.ln1@osiris.mauzo.dyndns.org>
Quoth roadrunner <whyleyc@gmail.com>:
<sorry, I can't help with MySQL stuff...>
> I've also tried wrapping the code block in an alarm as below, but
> again this makes no difference (note the alarm function seems to work
> fine when I test it with other commands):
This I doubt under Win32, or under 5.8 on any platform by default.
Signals don't behave at all. Does an alarm interrupt any IO that's
taking a long time? For instance, an attempted connect() to a host that
is down?
> Can anyone either see any problems with this code or suggest
> alternative ways of doing this ?
AFAIK if you can't get DBI to timeout properly on its own then the only
thing you can do is execute the connect in a new thread, sleep for an
appropriate amount of time, and then if the worker thread is not
joinable (because it hasn't completed) detach it and leave it to fail in
its own time. This will be rather tricky to code, especially if you want
to poll rather than simply allowing the connect to always take maximum
time, and there may be issues with returning a DBI object from a thread.
Ben
------------------------------
Date: Sat, 13 Oct 2007 03:31:54 -0700
From: GRE <gre11100@gmail.com>
Subject: Re: optimal vs. optimized [was: Re: string concatentation...]
Message-Id: <1192271514.343726.175040@v29g2000prd.googlegroups.com>
On Oct 5, 2:10 pm, vocabulary <vocabular...@gmail.com> wrote:
> On Oct 2, 1:42 am, Michele Dondi <bik.m...@tiscalinet.it> wrote:
>
>
>
>
>
> > Note: crossposted to some supposedly relevant groups. If anyone has
> > better ones to suggest, then they're welcome.
>
> > For people reading this outside of clpmisc, the question arose with
> > the following post:
>
> > <news:sfvqs4-b8b.ln1@osiris.mauzo.dyndns.org>
>
> > which in turn was in response to an observation of mine. The whole
> > thread is available from GG at the following URL:
>
> > <http://groups.google.com/groups?threadm=3Dsfvqs4-b8b....@osiris.mauzo.=
dyndns.org>
>
> > =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=AD=AD=3D=3D=3D=3D=3D
>
> > On Thu, 27 Sep 2007 02:59:52 +0100, Ben Morrow <b...@morrow.me.uk>
> > wrote:
>
> > >You have a good point; however, as is usual in English grammar,
> > >arguments from ancestry don't always help :). For instance, if 'optimu=
m'
> > >and derived words are necessarily superlative, then 'optimized' means
> > >'made best', and A cannot be more optimized than B either. A has either
> > >been 'made best' or it hasn't.
>
> > I'm not sure. 'To optimize' could mean 'to try to reach the optimum'
> > (or optimal incarnation - of something) thus 'optimized' may mean 'to
> > have undergone the process of optimization', thus to have gone as much
> > as possible (wrt some constraints, e.g. time) towards the optimum
> > without necessarily reaching it. By contrast I see 'optimal' very much
> > as a synonym of 'optimum' itself, and personally I find much more
> > acceptable the expression 'more optimzed' than 'more optimal'.
>
> > >I think what has happened is that, in English, 'optimal' and
> > >'optimized' have acquired something of a sense of 'efficient', which is
> > >clearly comparative, rather than of 'best' in a more general sense. So
>
> > That they have been or are occasionally used in that sense may well
> > be, but I would be surprised to learn that they have actually
> > "acquired" it. If I paste the remaining two entries found by dict
> > (which I snipped last time), namely:
>
> > : From Moby Thesaurus II by Grady Ward, 1.0 :
> > :
> > : 24 Moby Thesaurus words for "optimal":
> > : best, champion, choice, elect, elite, for the best, greatest,
> > : handpicked, matchless, optimum, paramount, peerless, picked, pri=
me,
> > : prize, quintessential, select, supreme, surpassing, unmatchable,
> > : unmatched, unparalleled, unsurpassed, very best
> > : =20
> > : =20
> > :
> > :
> > : From The Free On-line Dictionary of Computing (27 SEP 03) :
> > :
> > : optimal
> > : =20
> > : 1. Describes a solution to a problem which
> > : minimises some cost function. Linear programming is one
> > : technique used to discover the optimal solution to certain
> > : problems.
> > : =20
> > : 2. Of code: best or most efficient in time,
> > : space or code size.
>
> > you will see that the last one, which is specifically aimed at CS and
> > IT -and it's actually relevant here- still does not mention just
> > "efficiency". Thus my take on the issue is that 'optimal' is not just
> > 'efficient' as alleged, but 'the most efficient'. All this, still at a
> > syntactical level, i.e. we're not discussing yet what "efficient"
> > could mean.
>
> > I'll repeat myself: maybe this strikes me more strongly because of my
> > implicit Latin heritage, but I still find 'more optimal' to sound like
> > 'more most efficient'.
>
> > >optimizing a program doesn't necessarily make it better, it simply mak=
es
> > >it more efficient: other things may be more important than efficiency,
>
> > This is semantics. "better" and "more efficient" are both
> > comparatives. That other things may be more important than efficiency
> > (and indeed I think they are) is irrelevant to the linguistic point
> > being discussed here.
>
> > >portability or readability for example. 'Optimum' has not (I would say)
>
> > We're not necessarily speaking of computer programs here, and although
> > it is not in the dictionaries I mentioned before I think that the
> > italian definition I found for 'ottimale' may well be translated in
> > English, which is what I'm trying to do now:
>
> > : adj: of something that, according to some determinate parameters or
> > : points of view, represents the *best* possible condition or the *best*
> > : possible result: e.g. optimal life conditions.
>
> > If you accept this, then you can still speak in the context of
> > programming of a
>
> > >changed like this, so I find it odd that the dictionaries you quoted s=
ay
> > >it is synonymous with 'optimal': I would entirely agree that 'more
> > >optimum' is obviously wrong.
>
> > In all earnestness I had never witnessed the use you're reporting of
> > 'optimal', namely that in which it is not a superlative. But
> > admittedly I do not read *that* much in English.
>
> > >Theory aside, a quick google shows that 'more optimal' is definitely
> > >acceptable usage; for instance (a random example from the results)
>
> > Huh?!? Google may show that "ur so c00l bro" is acceptable usage!!
>
> > > This is because the claim that A is more optimal or better adapted
> > > than B with respect to some function does not entail that A is
> > > optimal or even good with respect to that function.
>
> > > http://www.seop.leeds.ac.uk/archives/fall1999/entries/teleology-bi=
ology/
>
> > >which shows that 'optimal' can have the sense of 'efficient' or
> > >'effective' rather than simply 'best'.
>
> > Well, that is from an academic institution thus should not fall in the
> > "ur so c00l bro", but I'm still skeptical: young researchers, however
> > good may they be in their research field, often tend to speak and
> > write very bad in their own mother tongue. For example in Italy some
> > young mathematicians are beginning to use the horrible anglophonic
> > "surgettiva" in place of the traditional "suriettiva", not that a word
> > borrowed from English is so bad in and of itself, but it is when
> > there's a perfectly fine alternative in one's own language.
>
> > > [English] not only borrows words from other languages; it has on
> > > occasion chased other languages down dark alley-ways, clubbed them
> > > unconscious and rifled their pockets for new vocabulary.
> > > -- James Nicoll
>
> > I knew that. In fact it's amongs my .sigs!
>
> > Michele
> > --
> > {$_=3Dpack'B8'x25,unpack'A8'x32,$a^=3Dsub{pop^pop}->(map substr
> > (($a||=3Djoin'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB=3D'
> > .'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=3D~/./g)x2,$_,
> > 256),7,249);s/[^\w,]/ /g;$ \=3D/^J/?$/:"\r";print,redo}#JAPH,
>
> Yes, vocabulary in English was made rich by the words from many other
> languages. These languages were of the places where British and
> English moved in the course of history. I saw a website which helps in
> knowing words and building vocabulary. It iswww.buildingvocabulary.org.- =
Hide quoted text -
>
> - Show quoted text -
origins of the English words are many and so mastering them may be
little difficult.
www.vocabularycafe.com
www.improvingvocabulary.org
these may help
------------------------------
Date: Sat, 13 Oct 2007 14:23:58 -0400
From: Martin Ambuhl <mambuhl@earthlink.net>
Subject: Re: optimal vs. optimized [was: Re: string concatentation...]
Message-Id: <5ncgq3Fhk0hqU1@mid.individual.net>
GRE wrote a message of 205 lines, all of which was quotation except:
> origins of the English words are many and so mastering them may be
> little difficult.
> www.vocabularycafe.com
> www.improvingvocabulary.org
>
> these may help
Even though you are using the news client of the clueless,
groups.google.com, you can avoid being tarred with that brush if you
learn how to use it. One of the most important is to snip away all but
those sections of the original post except those necessary and germane
to you response. Quoting the whole original post only to add your own
tiny bit to the end is unnecessary and, in fact, rude.
------------------------------
Date: Sat, 13 Oct 2007 19:01:41 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: quotes difference in Perl5.6 vs 5.8
Message-Id: <5pd7u4-b81.ln1@osiris.mauzo.dyndns.org>
Quoth "Petr Vileta" <stoupa@practisoft.cz>:
> Abigail wrote:
> > _
> > Petr Vileta (stoupa@practisoft.cz) wrote on VCLV September MCMXCIII in
> > <URL:news:femg9b$10oj$1@ns.felk.cvut.cz>:
> > )) I have script written in Perl 5.6.1 and it wotk fine. But when I
> > run the )) same script on hosting server then this fail on trivial
> > operation. On server )) Perl 5.8.0 is installed.
> > )) The example to ilustrate error is this
> > ))
> > )) #!/usr/bin/perl
> > )) use strict;
> > )) use warnings;
> > )) my $var = "abcd'efg";
> > )) open OUT, "> log.txt";
> > )) print OUT "$var\n"; # here script fail on server with SIG-PIPE
> > signal )) close OUT;
> > ))
> > )) Is something wrong in my script or is some bug in Perl 5.8.0 ?
> >
> >
> > There's something wrong with your script. You're not checking the
> > return value of 'open', blindly assuming it succeeds.
> >
> I checking it, of course. This was be example only. When my script fail then
> tens or hudreds of lines are written in.
> I thing that some difference is between Perl 5.6.1 and 5.8.0 in work with
> quoutes.
>
> #!/usr/bin/perl
> use strict;
> use warnings;
> my $var = "abcd'efg";
> open OUT, "> log.txt" or die("You stupid!");
> print OUT "$var\n";
> close OUT;
>
> This work in Perl 5.6.1 but fail in 5.8.0, but if I change this
Don't use 5.8.0. It is very buggy. You should upgrade to 5.8.1 if at all
possible.
> print OUT "$var\n";
> to this
> print OUT $var, "\n";
> then this work in both Perl versions.
I *seriously* doubt this makes any difference... I think it's more
likely that the error is rather random, and is appearing on the wrong
line because of the 5.8 safe signals code (which causes signals to
appear to be delivered later than they should be). What is STDERR open
to? My suspicion is that it is open to a pipe, and that
1. the open is failing
2. STDERR is a pipe that has been closed
3. die is attempting to write to that pipe, and getting SIGPIPE
4. perl delivers that signal one statement too late, so it appears
to you that it is the print that is signalling.
What happens if you set $SIG{PIPE} to 'IGNORE' and check the return
value of all your print statements? If it is the print that is
signalling, then it should start failing with $! set to EPIPE. If I am
correct then the die error will go nowhere and the print will fail with
EBADF, or EINVAL, or some such (it ought to be EBADF).
What happens if, instead of this, you install your SIGPIPE handler with
POSIX::sigaction, which will bypass safe signals; something like
use POSIX qw/sigaction SIGPIPE/;
use Carp qw/cluck/;
sigaction
SIGPIPE,
POSIX::SigAction->new(
sub { cluck "got SIGPIPE" }
);
What happens if you add a call to Scalar::Util::openhandle, to check
that the filehandle is actually open?
Ben
------------------------------
Date: Sat, 13 Oct 2007 07:38:01 -0700
From: nike shoes <zhurenfu888@hotmail.com>
Subject: Wholesale all NIKE.shox.Air max.AF1.TN.Jordan.shoes.Apple Ipods Nano, Xbox 360, Sony PS3, Sony PSP.wii.all laptops http://www.new-nikeshoes.com
Message-Id: <1192286281.945588.205280@y27g2000pre.googlegroups.com>
hi
We wholesale all laptops
Sony VGN-CR13/B 380$
Sony VGN-CR13/L 350$
Sony VGN-CR15/B 320$
Sony VGN-CR13/P 480$
Sony VGN-C21CH 450$
Sony VGN-SZ44CN 580$
Sony VGN-C22CH/W 620$
Sony VGN-N17C 480$
Sony VGN-CR13/W 580$
Sony VGN-FZ15 560$
Apple MacBook 580$
Apple MacBook Pro(MA896CH/A)680$
Apple MacBook Pro(MA896CH/A) 630$
Apple MacBook (MB063CH/A) 580$
Apple MacBook Pro(MA895CH/A) 580$
Apple MacBook(MB062CH/A) 590$
Apple MacBook(MA700CH/A) 580$
Apple MacBook(MA701CH/A) 550$
Apple MacBook Pro =EF=BC=88MA610CH/A=EF=BC=89 650$
Apple MacBook Pro (MA611CH/A) 680$
Apple MacBook (MA699CH/A) 580$
(1).all products are all original and new
(2).they have 1year international warranty.
(3).free shipping include ems, tnt, dhl, ups. you may choose one kind
(4).deliver time is in 7 days to get your door
We insist the principia: Prestige first,high-quality,competitive
price,
best services,and timely delivery.
Website: http://www.new-nikeshoes.com
msn: zhushao999@hotmail.com
Hong-da Co., Ltd.
hi
We are wholesaler of Nike Jordan and Other Shoes in China. We are big
Shoes Manufacturer in China. We supply many kinds of Shoes, such as
Nike Shoes, Jordan 1-22, Air Jordan, AF1, DUNK, Air max series etc.
Most of them are in stock and can be supplied surely on time. All
these shoes are packed with original-boxes and cards. So we can offer
series of brand Nike shoe with the lowest price and high quality, We
are looking forward to doing business with you
Very fast and safety delivery by TNT, UPS, DHL OR EMS, we can delivery
within 24 hours upon receiving your payment. It is very safe door to
door service, never get problems with customs.
There are various and latest styles for your choice in our website.
Our main markets are the USA, the UK, Germany, France, Italy, Greece,
Jordan, Australia, Canada,Sweden, and many other countries in Europe
and the Middle East regions.
We insist the principia: Prestige first,high-quality,competitive
price,
best services,and timely delivery.
Website: http://www.new-nikeshoes.com
msn: zhushao999@hotmail.com
Hong-da Co., Ltd. hi
our brands , Ipod nano 1G 2G 4G 8G 30G 60G ,Ps3 ,psp ,wii,are also
available for sale at cheaper rate. They are all brand new with full
accessories and 1 year international warranty, unlocked, work
effectively with any network worldwide and come with user manual guide
in various languages.
Our minimum order is 10 units and we receive payment by moneygram
international money transfer or western union money transfer. There is
10% sales discount for order above 20 units to 50 units,15% discount
for order above 50 units to 100 units and 20% discount for order above
100 units.
Ipod nano 1G 45$ ,2G 55$, 4G 65$,8G 70$, 30G 100$ ,60G 120$
ps3 60GB 300$ 20GB 180$
psp 150$
wii 200$
(1).all products are all original and new
(2).they have 1year international warranty.
(3).free shipping include ems, tnt, dhl, ups. you may choose one kind
(4).deliver time is in 7 days to get your door
We insist the principia: Prestige first,high-quality,competitive
price,
best services,and timely delivery.
Website: http://www.new-nikeshoes.com
msn: zhushao999@hotmail.com
Hong-da Co., Ltd.
------------------------------
Date: Sat, 13 Oct 2007 15:07:09 -0400
From: "Jim Carlock" <anonymous@127.0.0.1>
Subject: Re: Windows,ASSOC,FTYPE,.pl,.plx,.sh
Message-Id: <47111763$0$7472$4c368faf@roadrunner.com>
"l v" wrote...
: So you want to install Perl on a windows server but do not want
: Perl scripts to execute via the web. Correct?
Perl is already installed. I just want a fully enabled cmd prompt,
but I don't want to go through the GLOBAL changes that FTYPE and
ASSOC apply. Environmental variables are locally maintained within
a cmd prompt, meaning if you change one of those, they only affect
that particular cmd prompt and NONE of the others that are already
open and that open in the future. I'm wondering if there's a way to
get an association to take effect without GLOBALLY producing the
association.
It's 100% a problem to Windows NT and possibly Windows 9x. In effect,
it's more of learning how to work with a cmd prompt than it is any-
thing else. I was hoping someone within the Perl group delt with it
in the past and knew of an answer.
I know how to configure httpd.conf to run Perl within an Apache web-
server (that's not what I'm dealing with).
Perl is installed, but ASSOC points the extensions to a handler that
does not handle anything, so typing in a Perl filename inside a cmd
prompt does not run the files. The cmd prompt needs to get configured
to make sure the PATH environmental variable points to a proper path,
and then to run the scripts... I think I need to dig into permissions
and reconfigure Apache with a different set of permissions. If any-
one has a link explaining configuring Apache permissions on a Windows
server, that would be kindly appreciated.
Thanks.
--
Jim Carlock
Swimming Pool, Spa And Water Feature Builders
http://www.aquaticcreationsnc.com/
------------------------------
Date: Sat, 13 Oct 2007 15:14:58 -0400
From: "Jim Carlock" <anonymous@127.0.0.1>
Subject: Re: Windows,ASSOC,FTYPE,.pl,.plx,.sh
Message-Id: <47111936$0$24278$4c368faf@roadrunner.com>
There a way to make the shebang work on a Windows system?
--
Jim Carlock
Swimming Pool, Spa And Water Feature Builders
http://www.aquaticcreationsnc.com/
------------------------------
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 V11 Issue 934
**************************************
