[9805] in Perl-Users-Digest
Perl-Users Digest, Issue: 3398 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Aug 8 17:07:20 1998
Date: Sat, 8 Aug 98 14:00:16 -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 Sat, 8 Aug 1998 Volume: 8 Number: 3398
Today's topics:
Re: Autoincrement with hashes (Kenneth Herron)
Re: BIZARRE: killing window kills bg perl process <wall@bacon.ethz.ch>
Re: calling perl from c++ (Nathan V. Patwardhan)
Re: Can't make flock work as described... <joreb@algonet.se>
Re: Can't make flock work as described... <tchrist@mox.perl.com>
Re: Can't make flock work as described... <joreb@algonet.se>
Re: Can't make flock work as described... (Nathan V. Patwardhan)
Re: EASY $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ (Gary L. Burnore)
Re: Help interpreting error message (Mark-Jason Dominus)
Re: hiding user input (Ronald J Kimball)
Re: hiding user input (Ronald J Kimball)
Re: hiding user input (Ronald J Kimball)
Re: hiding user input (Gary L. Burnore)
Re: hiding user input (Gary L. Burnore)
My translation of a perl page (Jacques Guellec)
Re: Possible bug in RE handling - confirmation requeste (John D. Hardin)
Re: Possible bug in RE handling - confirmation requeste (Alan Schwartz)
Programmers from the former USSR. bih22@my-dejanews.com
Q:perlcc cannot generate native EXE? ccalam@cityu.edu.hk
sorting hash by values (j)
Re: Underwood Typewriter and the backslash (Jeffrey Drumm)
Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 8 Aug 1998 15:34:17 GMT
From: kherron@campus.mci.net (Kenneth Herron)
Subject: Re: Autoincrement with hashes
Message-Id: <6qhr5p$i3i$1@news.campus.mci.net>
In article <r9yt3q62.fsf@mailhost.panix.com>,
Jonathan Feinberg <jdf@pobox.com> wrote:
|It's a common idiom for autovivifying hash elements. If $h{foo}
|doesn't exist, then the phrase $h{foo}++ will bring it into existance.
|The fact that its value is now 1 is immaterial. If we run into foo
|again, the value will increase, but it's only the existance of the key
|foo that interests us.
Hrumph.
--------------
use Benchmark;
timethese(
1000,
{'load-inc-store' =>
sub {
my(%h, $h);
for ($h = 2000; $h--; ) {
$h{$h}++;
}
},
'store' =>
sub {
my(%h, $h);
for ($h = 2000; $h--; ) {
$h{$h} = 1;
}
}}
);
--------------
Benchmark: timing 1000 iterations of load-inc-store, store...
load-inc-store: 30 secs (30.40 usr 0.01 sys = 30.41 cpu)
store: 28 secs (27.93 usr 0.00 sys = 27.93 cpu)
--
Kenneth Herron -- kherron@campus.mci.net
"When Microsoft first took control of the Funk & Wagnalls Encyclopedia
product, there was a flattering biography of Bill Gates. But it said he
was known as a tough competitor. Now it says that he's known for his
charitable contributions." -- Gary Reback, <http://www.ljx.com/reback/>
------------------------------
Date: 08 Aug 1998 18:16:25 +0200
From: Ernst-Udo Wallenborn <wall@bacon.ethz.ch>
Subject: Re: BIZARRE: killing window kills bg perl process
Message-Id: <uig1f7qwiu.fsf@bacon.ethz.ch>
k y n n <NOSPAMkEynOn@panix.comNOSPAM> writes:
> In <6qd8hm$i8p$3@csnews.cs.colorado.edu> Tom Christiansen <tchrist@mox.perl.com> writes:
> >I bet you're using one of those lame shells that doesn't automatically
> >"no hup" backgrounded processes.
>
> No, actually, I'm using a shell that does automatic nohup'ing on
> processes run with an "&" at the end of the command line, so I don't
> think that's it.
As far as i know _exit sends SIGHUP only to to processes in
the same session if the exiting process is a session leader [1].
In plain English: unless your shell is not a login shell,
nohup wouldn't change anything since the children are not
SIGHUPped in the first place.
> I've distilled the problem to the script below. It (the script) takes
> one command line argument (default 1), representing the number of
> children to exec. (It exec's a make-work script called buzz).
> If called with an argument of 1:
> it and its exec'd child persist after the issuing shell has expired,
> as they should. But, if one calls [it with an argument '2']
> parent and children disappear as soon as the issuing shell is killed.
This is not so weird, actually. Take your scripts, name them
pidchk.pl and buzz.pl, open a shell, run 'pidchk.pl 1&' and
look at the output of ps
[xwsh under IRIX 6.3, perl 5.004_04, shell is bash in this
particular example]
---
wall@bacon 154:psgrep 'pid == 17007 or ppid == 17007 or pid == 16994 or pid == 16993'
S USER PID PPID VSZ NI STIME TIME ARGS
S wall 16994 16993 2376 20 16:46:52 0:00 -bash
R wall 17008 17007 2264 20 16:47:08 0:08 /usr/local/bin/perl buzz.pl
S wall 17007 16994 2272 20 16:47:07 0:00 /usr/local/bin/perl ./pidchk.pl 1
S root 16993 1 3284 10 16:46:52 0:00 xwsh -name winterm -name winterm
---
everything all right here. Now exit bash, and look at the processes
again
---
wall@bacon 155:psgrep 'pid == 17007 or ppid == 17007 or pid == 16994 or pid == 16993'
S USER PID PPID VSZ NI STIME TIME ARGS
R wall 17008 17007 2264 20 16:47:08 0:12 /usr/local/bin/perl buzz.pl
S wall 17007 1 2272 20 16:47:07 0:00 /usr/local/bin/perl ./pidchk.pl 1
---
buzz.pl is still alive and kicking, only that its parent has 1 as ppid
now. Exit makes init adopt the children of a dying process, so all
clear here, too.
The same with 'pidchk.pl 2&':
---
wall@bacon 159:psgrep 'pid == 17075 or ppid == 17075 or pid == 17066 or pid == 17065'
S USER PID PPID VSZ NI STIME TIME ARGS
T wall 17077 17075 2264 20 16:48:41 0:00 /usr/local/bin/perl buzz.pl
S wall 17066 17065 2376 20 16:48:35 0:00 -bash
R wall 17076 17075 2264 20 16:48:41 0:07 /usr/local/bin/perl buzz.pl
S wall 17075 17066 2272 20 16:48:41 0:00 /usr/local/bin/perl ./pidchk.pl 2
S root 17065 1 3284 10 16:48:35 0:00 xwsh -name winterm -name winterm
---
Now the first buzz.pl process, pid==17076, is running, however the
second one, pid==17077, is not sleeping, but stopped (S eq 'T'),
since pidchk.pl stopped its children. If you now exit bash,
all these processes disappear. Why? From the exit manpage:
---
The parent process ID of all of the calling process's existing child
processes and zombie processes is set to 1. This means the
initialization process [see intro(2)] inherits each of these
processes.
---
Afaik, you can't change the p_parent pointer in the proc table entry
of a process that is stopped or has stopped children. So this
fails, and the processes get killed. If you say
---
foreach $p (@pid) {
die "Can't CONT $pid[$p]!\n" unless 1 == kill(CONT => $pid[$p]);
}
---
then psgrep's output is
---
wall@bacon 162:psgrep 'pid == 17255 or ppid == 17255 or pid == 17177 or pid == 17176'
S USER PID PPID VSZ NI STIME TIME ARGS
S wall 17255 17177 2276 20 16:53:53 0:00 /usr/local/bin/perl ./pidchk.pl 2
S wall 17177 17176 2408 20 16:51:29 0:00 -bash
R wall 17257 17255 2264 20 16:53:53 0:05 /usr/local/bin/perl buzz.pl
R wall 17256 17255 2264 20 16:53:53 0:05 /usr/local/bin/perl buzz.pl
S root 17176 1 3292 10 16:51:29 0:00 xwsh -name winterm -name winterm
Note that both buzzes are (R)unning now. exit bash and voila:
wall@bacon 163:psgrep 'pid == 17255 or ppid == 17255 or pid == 17177 or pid == 17176'
S USER PID PPID VSZ NI STIME TIME ARGS
S wall 17255 1 2276 20 16:53:53 0:00 /usr/local/bin/perl ./pidchk.pl 2
R wall 17257 17255 2264 20 16:53:53 0:06 /usr/local/bin/perl buzz.pl
R wall 17256 17255 2264 20 16:53:53 0:06 /usr/local/bin/perl buzz.pl
---
> (Arguments > 1 show one further anomaly: in most (but not all) cases,
> instead of exec'ing the requested number n of "buzz", it exec's only
> 1, plus forks (n-1) copies of itself; on rare occasions, it exec's the
> n "buzz" jobs as requested.)
This is something i couldn't reproduce. Sorry, i have no clue here.
[1] Magic Garden, 4.15.2
--
Ernst-Udo Wallenborn
Laboratorium fuer Physikalische Chemie
ETH Zuerich
------------------------------
Date: 8 Aug 1998 19:07:49 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: calling perl from c++
Message-Id: <6qi7m5$fdo@fridge.shore.net>
Dirk Hoffmann (dhoffman@fzi.de) wrote:
: Has somebody a small example code, of how to call a perl script or perl
: function with parameters from c++ ?
Let's see some code. AND you might also want to check out Dean
Roehrich's C++ stuff which is available on CPAN (URL forgotten -- but
it's also probably located under Dean_Roehrich in the CPAN authors
section).
For starters, have you built a Perl which is capable of calling C++
and vice versa? This is mentioned in Dean's doc, BTW.
--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>
------------------------------
Date: Sat, 8 Aug 1998 16:08:42 +0200
From: "Ekenberg" <joreb@algonet.se>
Subject: Re: Can't make flock work as described...
Message-Id: <6qhm5t$9s5$1@zingo.tninet.se>
OK, so how should breakin.pl (in my example) implement this politeness?
In other words, please correct my example to make it work.
Politely, Johan E
<snip>
>Likewise, all that
>flock blocks out is other flockers--not processes trying to do I/O.
>Unless everyone is polite, accidents can (and will) happen.
>
>Be polite.
>
------------------------------
Date: 8 Aug 1998 15:44:59 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Can't make flock work as described...
Message-Id: <6qhrpr$ejo$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, "Ekenberg" <joreb@algonet.se> writes:
:OK, so how should breakin.pl (in my example) implement this politeness?
:In other words, please correct my example to make it work.
If you expect a program to honor flocks, you have to have
flock calls in that program. Is that too obvious?
(Not that you posted programs; I saw only libraries.)
--tom
--
#define NULL 0 /* silly thing is, we don't even use this */
--Larry Wall in perl.c from the v4.0 perl source code
------------------------------
Date: Sat, 8 Aug 1998 20:06:02 +0200
From: "Ekenberg" <joreb@algonet.se>
Subject: Re: Can't make flock work as described...
Message-Id: <6qi438$8kt$1@cubacola.tninet.se>
<snip>
>If you expect a program to honor flocks, you have to have
>flock calls in that program. Is that too obvious?
Maybe it is... -thank you very much, I got it working now. Much obliged.
:)
>(Not that you posted programs; I saw only libraries.)
Speaking of politeness earlier, I can't help thinking that you seem to want
to pick on me for looking for more knowledge. I use the .pl extension
because that's what I've learnt to do, through for example the PERL5 HowTo
from Waite Group press. It would be nicer and politer of you to tell me what
extension to use, instead of talking in insinuations and riddles. I really
like Perl and am dedicated to learning it well. I want to learn, so I ask
questions. Is that so strange?
What extension would you like me to use?
/Johan E
------------------------------
Date: 8 Aug 1998 19:03:57 GMT
From: nvp@shore.net (Nathan V. Patwardhan)
Subject: Re: Can't make flock work as described...
Message-Id: <6qi7et$fdo@fridge.shore.net>
Ekenberg (joreb@algonet.se) wrote:
: What extension would you like me to use?
Probably anything but .pl or .pm, and I've also seen it suggested
(here) that Perl *programs* shouldn't have any extension at all. But
you could use something like .prl, .perl, .oops or whatever. :-)
--
Nate Patwardhan|root@localhost
"Fortunately, I prefer to believe that we're all really just trapped in a
P.K. Dick book laced with Lovecraft, and this awful Terror Out of Cambridge
shall by the light of day evaporate, leaving nothing but good intentions in
its stead." Tom Christiansen in <6k02ha$hq6$3@csnews.cs.colorado.edu>
------------------------------
Date: Fri, 07 Aug 1998 19:23:58 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: EASY $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
Message-Id: <35dd5430.7632aj73@reader2.wxs.nl>
Een Viper 330 niet snel???????? Dan zou je toch eens je computer
wat moeten fine-tunen, het is namelijk een van de snelste kaarten
op dit moment!
Super Grover heeft geschreven in bericht <6qd3fv$aj73@reader2.wxs.nl>...
>>
>>>On Thu, 06 Aug 1998 08:00:59 GMT, joop.hinke@pi.net (Joop Hinke )
>>>wrote:
>>>De prijs is veeeeel te hoog voor een 2e hands geval!!!
>>>
>Zeker te hoog, ik heb um voor 85 piek, AGP !
>
>En snel is ie zeker niet....
>
>MT VRNDLK GRT
>
>
>
>
>
>
>
------------------------------
Date: 8 Aug 1998 11:34:17 -0400
From: mjd@op.net (Mark-Jason Dominus)
Subject: Re: Help interpreting error message
Message-Id: <6qhr5p$evf$1@monet.op.net>
In article <35CB7AB9.4E96320E@amoco.com>,
Andrew W. Robinson <awrobinson@amoco.com> wrote:
>I'm getting the following error message in a script I'm working
>on:
>
> Use of uninitialized value at (eval 21) line 18.
When you evaluate code with the `eval' function, and it contains an
error, you get a message like this. The error is at line 18 of the
evaluated string, not line 18 of your file.
------------------------------
Date: Sat, 8 Aug 1998 11:32:55 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: hiding user input
Message-Id: <1ddfwfc.1srr8u716b4dkwN@bay1-167.quincy.ziplink.net>
Steve Linberg <linberg@literacy.upenn.edu> wrote:
> It has always been my understanding that every first-time poster to this
> groups gets an automatic email response saying "welcome and so forth...
> and before you post this message, have you read the FAQ's, use strict and
> perl -w," and so on, and the user has to resubmit the question in order
> for it to be posted. Is this no longer the case?
I believe you are mistaken. Every first-time poster does get an
automatic email response, but *does not* have to resubmit the question
in order for it to be posted. The "Welcome to clpm" message is sent
*after* the first post has already been posted on the newsgroup. As far
as I know, it has always been that way.
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 8 Aug 1998 11:32:57 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: hiding user input
Message-Id: <1ddfwnc.mk74a7w50me6N@bay1-167.quincy.ziplink.net>
Russ Allbery <rra@stanford.edu> wrote:
> It's Usenet. People don't always read what they should have, or respect
> the things that you think should be respected. There isn't much one can
> do about it other than try to educate each person individually, and
> yelling at them doesn't accomplish that. FAQs are frequently asked, by
> definition, and always will be.
This also applies rather well to the people who are flaming the askers
of FAQs. It's unlikely they will be convinced to change the tone of
their responses by having people yell and curse at them. Fortunately,
the definition of FAQ does not include rude responses, so maybe people's
behavior can be changed in that regard.
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 8 Aug 1998 11:32:58 -0400
From: rjk@coos.dartmouth.edu (Ronald J Kimball)
Subject: Re: hiding user input
Message-Id: <1ddfxb9.1i0o2m42u2nf1N@bay1-167.quincy.ziplink.net>
Matthew O. Persico <mpersico@erols.com> wrote:
> 1) I'd like to see all the combatants in one physical room. Five bucks
> says few, if any, of the venemous words we've seen here would have been
> said.
Of course not. If we were all in one physical room, we could just kick
the shit out of one other!
*rofl*
--
_ / ' _ / - aka - rjk@coos.dartmouth.edu
( /)//)//)(//)/( Ronald J Kimball chipmunk@m-net.arbornet.org
/ http://www.ziplink.net/~rjk/
"It's funny 'cause it's true ... and vice versa."
------------------------------
Date: Sat, 08 Aug 1998 17:03:51 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: hiding user input
Message-Id: <35cd84c3.154309462@nntpd.databasix.com>
On Sat, 8 Aug 1998 11:32:57 -0400, in article
<1ddfwnc.mk74a7w50me6N@bay1-167.quincy.ziplink.net>, rjk@coos.dartmouth.edu
(Ronald J Kimball) wrote:
>Russ Allbery <rra@stanford.edu> wrote:
>
>> It's Usenet. People don't always read what they should have, or respect
>> the things that you think should be respected. There isn't much one can
>> do about it other than try to educate each person individually, and
>> yelling at them doesn't accomplish that. FAQs are frequently asked, by
>> definition, and always will be.
>
>This also applies rather well to the people who are flaming the askers
>of FAQs. It's unlikely they will be convinced to change the tone of
>their responses by having people yell and curse at them.
This isn't necessarily so. It's worked so far. Abigail has indeed toned down
her jerkoff responses at least for awhile.
> Fortunately,
>the definition of FAQ does not include rude responses, so maybe people's
>behavior can be changed in that regard.
Maybe. One can only hope.
--
I DO NOT WISH TO RECEIVE EMAIL IN REGARD TO USENET POSTS
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DOH! | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
Special Sig for perl groups. | Official Proof of Purchase
===========================================================================
------------------------------
Date: Sat, 08 Aug 1998 17:04:55 GMT
From: gburnore@databasix.com (Gary L. Burnore)
Subject: Re: hiding user input
Message-Id: <35ce8502.154372581@nntpd.databasix.com>
On Sat, 8 Aug 1998 11:32:58 -0400, in article
<1ddfxb9.1i0o2m42u2nf1N@bay1-167.quincy.ziplink.net>, rjk@coos.dartmouth.edu
(Ronald J Kimball) wrote:
>Matthew O. Persico <mpersico@erols.com> wrote:
>
>> 1) I'd like to see all the combatants in one physical room. Five bucks
>> says few, if any, of the venemous words we've seen here would have been
>> said.
>
>Of course not. If we were all in one physical room, we could just kick
>the shit out of one other!
>
>*rofl*
Hehehe. To be more precise, some of us would kick the shit out of others of
us. It wouldn't be a one-another thing. It'd be VERY one sided. :) <--smiley
for the humor-impared.
--
I DO NOT WISH TO RECEIVE EMAIL IN REGARD TO USENET POSTS
---------------------------------------------------------------------------
How you look depends on where you go.
---------------------------------------------------------------------------
Gary L. Burnore | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
DOH! | ][3:]3^3:]33][:]3^3:]3]3^3:]3]][3
| ][3 3 4 1 4 2 ]3^3 6 9 0 6 9 ][3
Special Sig for perl groups. | Official Proof of Purchase
===========================================================================
------------------------------
Date: Sun, 09 Aug 1998 05:27:54 GMT
From: jguellec@imaginet.fr (Jacques Guellec)
Subject: My translation of a perl page
Message-Id: <6qibtj$3h8$1@news.imaginet.fr>
Hello,
I put a little Perl program on my site and i would like to know if the
translation i made is correct.
Can someone go to this adress and send me a correction by email ?
http://www.imaginet.fr/~jguellec/program/perl/iso9660e.htm
Thank you, :-)
jguellec@imaginet.fr
------------------------------
Date: Sat, 8 Aug 1998 10:03:55 -0700
From: jhardin@wolfenet.com (John D. Hardin)
Subject: Re: Possible bug in RE handling - confirmation requested
Message-Id: <rd0iq6.g9.ln@gypsy.wolfenet.com>
In article <6qhic1$7nd$1@csnews.cs.colorado.edu>,
Tom Christiansen <tchrist@mox.perl.com> writes:
> In comp.lang.perl.misc, jhardin@wolfenet.com writes:
>:causing high CPU loads. I have tested it on Linux 2.0.33 + Perl 5.004_01,
>:SunOS 4.1.4 + Perl 5.004_04 and Alpha OSF/1 V3.0 + Perl 5.004_04
>:
>:Can anyone confirm this for me?
>
> I can confirm that Linux 2.0.33 and either Perl 5.004_04 or 5.005_02,
> that it works fine and does not hang.
>
> --tom
Thanks.
Can anybody running SunOS 4.1.3 + Perl 5.004_04 try this? That's the only
platform I've had a failure report on so far.
--
John Hardin KA7OHZ jhardin@wolfenet.com
pgpk -a finger://gonzo.wolfenet.com/jhardin PGP key ID: 0x41EA94F5
PGP key fingerprint: A3 0C 5B C2 EF 0D 2C E5 E9 BF C8 33 A7 A9 CE 76
-----------------------------------------------------------------------
Your mouse has moved. Windows NT must be restarted for the change
to take effect. Reboot now? [ OK ]
-----------------------------------------------------------------------
78 days until Daylight Savings Time ends
------------------------------
Date: 8 Aug 1998 18:03:13 GMT
From: alansz@araw.mede.uic.edu (Alan Schwartz)
Subject: Re: Possible bug in RE handling - confirmation requested
Message-Id: <6qi3t1$2mh0$1@piglet.cc.uic.edu>
John D. Hardin <jhardin@wolfenet.com> writes:
>In article <6qhic1$7nd$1@csnews.cs.colorado.edu>,
> Tom Christiansen <tchrist@mox.perl.com> writes:
>> In comp.lang.perl.misc, jhardin@wolfenet.com writes:
>>:causing high CPU loads. I have tested it on Linux 2.0.33 + Perl 5.004_01,
>>:SunOS 4.1.4 + Perl 5.004_04 and Alpha OSF/1 V3.0 + Perl 5.004_04
>>:
>>:Can anyone confirm this for me?
>>
>> I can confirm that Linux 2.0.33 and either Perl 5.004_04 or 5.005_02,
>> that it works fine and does not hang.
>>
>> --tom
>
>Thanks.
>
>Can anybody running SunOS 4.1.3 + Perl 5.004_04 try this? That's the only
>platform I've had a failure report on so far.
SunOS 4.1.3_U1 and Perl 5.004_04 does *not* hang. I get this
output:
<body>
<body junk>
<BODY DEFANGED-ONLOAD="">
<BODY junk DEFANGED-ONLOAD="">
<BODY junk=">" DEFANGED-ONLOAD="">
<BODY junk="\">" DEFANGED-ONLOAD="">
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
Alan Schwartz <alansz@uic.edu>
Asst. Prof. of Clinical Decision Making | University of Illinois at Chicago
Adj. Asst. Prof. of Psychology | Department of Medical Education
"Life is what happens to you while you're busy making other plans"
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
------------------------------
Date: Sat, 08 Aug 1998 20:09:45 GMT
From: bih22@my-dejanews.com
Subject: Programmers from the former USSR.
Message-Id: <6qiba8$52c$1@nnrp1.dejanews.com>
Good afternoon !
I am writing to inform you that a group of highly skilled programmers
living in the former USSR is looking for a company or individuals from the
USA to establish a new kind of relationship, where their specialized
training, experience, knowledge and abilities will be useful and can be
utilized to mutually benefit.
This is a brief summary of our skills and qualifications:
Skills
Programming Languages: C++ (MS Visual C++, MFC), C, Java (MS Visual J++),
JavaScript / HTML, Assembler Intel 80x86, Assembler IBM 360/370 Mainframe,
Pascal, FORTRAN, PL/1, Basic, Lisp, Prolog; (DBMS:) SQL, MS-Access, dBase,
FoxPro, DELPHI, ObjectPAL, etc.
Computer platforms: IBM PC, SUN 10/20/Ultra, IBM 360/370 Mainframe,
Apple-Mac, etc.
Operating systems: Windows 95 / Windows NT, MS-DOS, UNIX / LINUX, Free BSD,
SUN OS, Solaris, OpenWindows, X-Windows, OS/2, Mac-OS, OS/MVT, TSX-11, etc.
Networking: TCP/IP, WWW, UNIX, Windows NT, Windows for Workgroups, NetWare,
etc.
Also: Recognition and Classification of Images, Neural Networks, Artificial
Intelligence, Knowledge Representation and databases, Applied Mathematics.
Qualifications
Management, Project Management & Planning, Rapid Development Management,
etc.
OOA/OOD/OOP, MFC, Windows NT/95 GUI, multithreading, Win32 SDK,
multimedia programming, ActiveX / OLE, ODBC, SQL, client-server,
network programming (TCP/IP, NetDDE), assembler (Intel 80x86 and
IBM 360/370 mainframe families), DOS/Windows/NT internals, undocumented DOS,
DOS TSRs, enabling / localization / internationalization / standardization,
software unauthorized copy protection and protected software creaking
experience, communications programming & protocols, Internet & Web
publishing / programming experience, data compression techniques,
recognition of images, self-organizing neural networks,
recognition/classification of sequential information, etc.
We can start with a small and insignificant task so we will be able
to show you the level of our skills and ability to perform serious tasks,
and we can do this work for less than American programmers! Your
satisfaction is guaranteed, we only get paid when your task is completely
fulfilled and you are satisfied! All the information (descriptions,
comments, corrections) can be sent and received via the Internet.
If you are interested please send me your message at BIH22@aol.com.
My name is Igor Veretin, I came from the Ukraine one year ago. Now I live
in Atlanta, GA. We can meet and discuss all the details or I can e-mail
you back and answer any questions that you may have.
Sincerely,
Igor Veretin.
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 08 Aug 1998 19:01:20 GMT
From: ccalam@cityu.edu.hk
Subject: Q:perlcc cannot generate native EXE?
Message-Id: <6qi7a1$on$1@nnrp1.dejanews.com>
Hello All,
I get the latest perl (5.005_001) and want to convert
perl script into native EXE under WIN32 environment.
I try a simple perl script (hello world) as follows:
C:\>type hello.pl
print "Hello World\n";
The script run fine with perl hello.pl
However, when I try to perlcc it, I get "Couldn't open !"
ERROR (Listed as follows:) Any Help Please?
C:\>perlcc hello.pl
--------------------------------------------------------------------------------
Compiling hello.pl:
-----------------------------------------------------------------------------
---
Making C(hello.pl.c) for hello.pl! C:\PERL\5.005\BIN\MSWIN3~1\PERL.EXE
-IC:\PERL\5.005\lib/MSWin32-x86-object -IC:\ PERL\5.005\lib
-IC:\PERL\site\5.005\lib/MSWin32-x86-object -IC:\PERL\site\5.005\ lib
-IC:\PERL\site\lib -I. -MO=CC,-ohello.pl.c hello.pl hello.pl syntax OK
Compiling C(hello) for hello.pl! Couldn't open !
-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp Create Your Own Free Member Forum
------------------------------
Date: Sat, 08 Aug 1998 20:29:30 GMT
From: jjones@nospam.elementdesign.com (j)
Subject: sorting hash by values
Message-Id: <35ccb4a4.37602004@nntp.best.com>
I have a hash with a bunch of words as keys, and the number of times
they occured in the file as values.
I want to sort the values and print them out, with their corresponding
keys, in numerical order.
I have no problem doing this with keys, but haven't the slightest idea
how to do it with values. Yes, I have looked at the perl faq, but
that was no help.
Any help appreciated...
thanks!
------------------------------
Date: Sat, 08 Aug 1998 15:40:28 GMT
From: drummj@mail.mmc.org (Jeffrey Drumm)
Subject: Re: Underwood Typewriter and the backslash
Message-Id: <35cd69ee.612982005@news.mmc.org>
On 7 Aug 1998 14:20:55 GMT, cpierce1@cp500.fsic.ford.com (Clinton Pierce)
wrote:
>I like the new cover to The Perl Journal, with the attempted run
>of ./Configure on the Underwood, but I have a question. Since the
>Underwood Typewriter has no backslash key (\), does Perl now support
>trigraphs for those architectures?
(snip)
No such special support has yet been added. The current workaround:
1. Eject your source code from the editor by repeated use of the
dedicated carriage-return tool
2. With the file visible and facing you, rotate it 180 degrees along the
vertical axis (the code should now be facing away from you)
3. Now rotate the file 90 degrees clockwise
4. Maintaining this orientation, Roll the file into the editor
5. Position the section of code requiring the backslash under the cursor
6. Enter a forward slash character
To continue development of your application:
1. Perform steps 1 and 2 above
2. Rotate the file 90 degrees counter-clockwise
3. Load it into the editor
4. Position the file under the cursor at the point you wish to continue.
NOTE: The above instructions will be included in the 5.005_02 update.
Support for forward-slash trigraphs should appear in Perl 5.1.
:-)
--
Jeffrey R. Drumm, Systems Integration Specialist
Maine Medical Center Information Services
420 Cumberland Ave, Portland, ME 04101
drummj@mail.mmc.org
"Broken? Hell no! Uniquely implemented." -me
------------------------------
Date: 12 Jul 98 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Special: Digest Administrivia (Last modified: 12 Mar 98)
Message-Id: <null>
Administrivia:
Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.
If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu.
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 3398
**************************************
