[11435] in Perl-Users-Digest
Perl-Users Digest, Issue: 5035 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Tue Mar 2 16:07:38 1999
Date: Tue, 2 Mar 99 13:00:27 -0800
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Tue, 2 Mar 1999 Volume: 8 Number: 5035
Today's topics:
Re: *** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Pos (I R A Aggie)
Re: *** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Pos (Abigail)
Re: -w && uninitialised value (Charles DeRykus)
Re: assignment operators <Lanny.Gilbert@bridge.bellsouth.com>
CGI Help Needed waxpack@waxpack.com
CGI.pm <izsof@lisa.njszki.hu>
Re: CONTEST: The Solitaire 500 <david@kasey.umkc.edu>
Re: CONTEST: The Solitaire 500 <david@kasey.umkc.edu>
Re: Cookies in IE3... (Abigail)
Re: Editing 2,000 lines of someone else's code <rra@stanford.edu>
Re: Finding the word after a word <staffan@ngb.se>
Re: Finding the word after a word (Abigail)
Re: How to interrupt a foreach loop <jeromeo@atrieva.com>
Re: How to interrupt a foreach loop (Larry Rosler)
How to parse telephone numbers from string <sergey@callcenter.ru>
Re: How to run cgi automatically? <sparker@wash.inmet.com>
Re: Is there a more efficient routine? (Ilya Zakharevich)
Is there a way to load BLOB into a LONG RAW field using <thomas.s.turner@delphiauto.com>
Re: logically impaired <staffan@ngb.se>
Re: method overriden! (M.J.T. Guy)
Re: Occasional Perl failure(?) question... <philipNOSPAM@hrsites.com>
Re: Pentium III Chips Released with IDs - Intel won't b (Kenny Chaffin)
Perl 5 for Intergraph CLIX workstation? <RobLemley@nospam.com>
Perl 5.00x and GDBM latest coexist with C? <sbrath@tds.net>
Re: switch/case for Perl (I R A Aggie)
Re: The truth about the Pentium III chip and ID --- **b <banderson@boi.hp.com>
Re: The truth about the Pentium III chip and ID --- **b <jeromeo@atrieva.com>
Re: The truth about the Pentium III chip and ID --- **b (Juergen Heinzl)
thread is over, Re: The truth about the Pentium III chi <olivaw@writeme.com>
translating a hex/int value to a string of bits. jfv@capgroup.com
Re: Variables in regular expressions (Larry Rosler)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 2 Mar 1999 15:39:35 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: *** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Posted Twice Weekly ***
Message-Id: <slrn7do1mf.e77.fl_aggie@enso.coaps.fsu.edu>
On Mon, 1 Mar 1999 23:58:31 +0000, Andrew Fry
<andrewf@beausys.demon.co.uk> wrote:
+ (with pointers to the relevant documentation). All I am saying is that
+ there is no need to remind us newbies, ad nauseam, that we should read
+ the FAQs, man pages, online articles, books.
Yes, well, the problem with clueless newbies is that the NEVER STOP COMING.
The reason the pointer to the FAQs and other documentation is so that the
new newbies (as opposed to the old newbies) can't say "I didn't know there
was a FAQ" or "Where *is* the FAQ, please?". It sits there right in front
of them.
In a different context, I'd say that in reference to "clueless newbies",
Thy Name is Legion. :)
+ RTFM is used far too often in this newsgroup.
It's there for a good reason. Those that can grok the documentation can
answer their own questions much more quickly and reliably than a post
to Usenet, where you may not get a response for a significant period of
time. And if you do receive a response (which is not a given), there's
not guarantee that the answer is going to be _correct_.
And when you do eventually post, you'll be more likely to get a
positive response, even from us Grumpy Old Perlers (GOP?? :). Your
post will probably tell us what you want to do, how you've attempted
to solve the problem, and where/how you're stuck, and why the docset
hasn't made things clear for you. As opposed to the "It doesn't work"
post.
+ And, as Uri's replies have shown, being sarcastic,
+ condescending, patronizing and abusive occasionally go along with the
+ reply.
If that makes you look at the on-line documentation first, instead of
reaching for that "Post" button, then so much the better.
Look, if you're not willing to read, you're really not going to make it
as a programmer.
James
------------------------------
Date: 2 Mar 1999 19:35:30 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: *** FAQ: ANSWERS TO YOUR QUESTIONS! READ FIRST! Posted Twice Weekly ***
Message-Id: <7bhei2$rgt$1@client2.news.psi.net>
Andrew Fry (andrewf@beausys.demon.co.uk) wrote on MMIX September MCMXCIII
in <URL:news:g75mKCA88822EwWw@beausys.demon.co.uk>:
^^
^^ I am quite calm, thanks, and have not made any stupid remarks. My point
^^ is simply that I find it irritating and patronizing to be constatntly
^^ told what I should be reading. I know what I should be reading, I know
^^ how much time I have to read, and Ill get around to it at my own pace.
Your time is more important than other people time?
Abigail
--
perl -e '$a = q 94a75737420616e6f74686572205065726c204861636b65720a9 and
${qq$\x5F$} = q 97265646f9 and s g..g;
qq e\x63\x68\x72\x20\x30\x78$&eggee;
{eval if $a =~ s e..eqq qprint chr 0x$& and \x71\x20\x71\x71qeexcess}'
------------------------------
Date: Tue, 2 Mar 1999 19:36:42 GMT
From: ced@bcstec.ca.boeing.com (Charles DeRykus)
Subject: Re: -w && uninitialised value
Message-Id: <F7zFt6.I40@news.boeing.com>
In article <pZMC2.5865$8N5.68922@typhoon-sf.pbi.net>,
Ekkis <ekkis@arix.com> wrote:
>In my code I often have references to environment variables which sometimes
>don't exist. e.g.
>
> print "Debugging: " . $ENV{DEBUG};
>
>when I run this with -w I get:
>
>"Use of uninitialized value at XX.pm line XX, <STDIN> chunk 1."
>
>how can I avoid this? it doesn't make sense to first assign values to all
>possible environment variables and I don't want to have to test for
>existence every time I use something just to avoid this error.
>
An ugly workaround:
print "Debugging: " . ($ENV{DEBUG} ||= '');
hth,
--
Charles DeRykus
------------------------------
Date: Tue, 02 Mar 1999 14:36:06 -0500
From: Lanny Gilbert <Lanny.Gilbert@bridge.bellsouth.com>
Subject: Re: assignment operators
Message-Id: <36DC3DA6.CDDB492E@bridge.bellsouth.com>
Bart Lateur wrote:
>
> Greg Coit wrote:
.
.
.
> Flip the bits in $lhs where those bits are set in $rhs.
>
> Rasie to the poser is "**".
Rasie to the poser?? Is that a new square dance term? :-)
------------------------------
Date: Tue, 02 Mar 1999 20:23:57 GMT
From: waxpack@waxpack.com
Subject: CGI Help Needed
Message-Id: <7bhhcj$djt$1@nnrp1.dejanews.com>
I am running a combination of EveryAuction (located at
everysoft.com) and DCProtect98 (located at dcscripts.com).
When using EveryAuction without DCProtect98, it runs fine.
Haven't had any problems yet, although it lacks the security
that the rest of my site uses.
So now i am trying to add DcProtect98, which is just a small
amount of text added to any cgi script, in which it then
password protects it.
Problem is that when using EveryAuction now, it doesn't know
how to bid on an item anymore.
Seems like there is a problem in the &get_form_data; section
which parses arguments from posted items.
I am looking for a cgi or perl programmer that can fix this
very small problem. I have tried, but don't know enough about
CGI to fix it. My guess is that the fix will only take about
30 minutes or so, but it is a very important fix.
I will pay by company check, half up front if needed to the
first programmer willing to take this job.
It must be completed within the next 5 days though.
Let me know by email, and I will send you the program specifics.
Thank You
Sincerely,
Jared Landress
http://www.waxpack.com
waxpack@waxpack.com
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 2 Mar 1999 18:40:35 +0100
From: "Dixie Flatline" <izsof@lisa.njszki.hu>
Subject: CGI.pm
Message-Id: <7bhgce$a8h$1@bolka.matav.net>
Hi!
>From where can I obtain the CGI.pm modole for PERL 5.004?
Best Regards,
deadline@freemail.c3.hu -->Primary
izsof@lisa.njszki.hu --> Secondary
http://lisa.njszki.hu/~izsof --> Dixie Flatline's HARDWiRED
Flatline
------------------------------
Date: Tue, 02 Mar 1999 13:08:27 -0600
From: David L Nicol <david@kasey.umkc.edu>
Subject: Re: CONTEST: The Solitaire 500
Message-Id: <36DC372B.CF39349@kasey.umkc.edu>
Ronald J Kimball wrote:
>
> David L Nicol <david@kasey.umkc.edu> wrote:
>
> > Contest home page: http://www.tipjar.com/games/solitaire/wheels
>
> That's great. Let us know when the Contest home page is ready for
> viewing.
The contest home page is ready for viewing, it is wheels.html is that
directory. There are some other documents in there too, such as example
code for both the server and client.
________________________________________________________________________
David Nicol 816.235.1187 UMKC Network Operations david@news.umkc.edu
------------------------------
Date: Tue, 02 Mar 1999 13:14:57 -0600
From: David L Nicol <david@kasey.umkc.edu>
Subject: Re: CONTEST: The Solitaire 500
Message-Id: <36DC38B1.593E6154@kasey.umkc.edu>
brian d foy wrote:
> what does "efficient" mean? i'm not being facetious.
Efficient means able to solve the problem in least time.
All contestants programs will be started simulataneously
and the first to complete will win. In opposition to
contests in which the entries are paired up in a round robin
scenario. It is expected that the running of the contest
will cause the "arena" computer to make use of its swap disk,
so "efficiency" also means good memory management.
The rules are described in depth
at http://www.tipjar.com/games/solitaire/wheels/wheels.html
------------------------------
Date: 2 Mar 1999 19:48:42 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Cookies in IE3...
Message-Id: <7bhfaq$rgt$2@client2.news.psi.net>
Pertti Maki-Valkkila (pejama@jane.math.jyu.fi) wrote on MMIX September
MCMXCIII in <URL:news:7bggat$hel$1@mordred.cc.jyu.fi>:
||
|| I'm working on a project that uses cookies to identify different users. I've
|| come across with a problem when setting cookies in IE3. It seems that the
|| structure of a cookie is different in version 3 than it is in IE4 (or NN3/4).
And your problem is a Perl problem because?
Abigail
--
perl -wleprint -eqq-@{[ -eqw\\\\- -eJust -eanother -ePerl -eHacker -e\\\\-]}-
------------------------------
Date: 02 Mar 1999 11:50:41 -0800
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Editing 2,000 lines of someone else's code
Message-Id: <yld82rzn5a.fsf@windlord.stanford.edu>
Jerome O'Neil <jeromeo@atrieva.com> writes:
> Fuchs McDowell wrote:
>> AAAAAAAAAAAAAARRRRRRRRRRRRGGGGGGHHHHHHHH
> Globalthermonuclear War.
"Tactical? TACTICAL!?!? Hey, buddy, we went from kilotons to megatons
several minutes ago. We don't need no stinkin' tactical nukes. (By the
way, do you have change for 10 million people?)" -- Larry Wall
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: Tue, 02 Mar 1999 20:02:28 +0100
From: Staffan Liljas <staffan@ngb.se>
Subject: Re: Finding the word after a word
Message-Id: <36DC35C4.E9F870D2@ngb.se>
Uri Guttman wrote:
>
> >>>>> "SL" == Staffan Liljas <staffan@ngb.se> writes:
>
> SL> $string =~ /\b$srch (\w+)\b/;
> SL> $word =~ $1;
> ^
> i think you mean = here and below. be careful what you type here!
Thanks for exposing my stupid ass. That's what I get for copying and
pasting code and then not testing before posting. I'll disappear in a
small humiliated cloud of green smoke.
> \s is not space but whitespace which covers \n so that is redundant.
Yes, yes, YES.
What I meant to say was [^ \n] but then I realised I wanted \t to, so I
said [^\s\n], which was what I wanted to avoid in the first place. I
have a vague memory of having some problems with \s and \S and national
characters sometimes, so I try to avoid them. [^\s] translates to \S, so
[^\s\n] is the original solution.....
The important part was:
1) Use \b
2) No need to worry about beginning and ending of string here.
Thanks, and I'm sorry
Staffan
------------------------------
Date: 2 Mar 1999 20:10:38 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: Finding the word after a word
Message-Id: <7bhgju$rpj$1@client2.news.psi.net>
kalikste@uiuc.edu (kalikste@uiuc.edu) wrote on MMVIII September MCMXCIII
in <URL:news:7bf4j7$ap3$1@nnrp1.dejanews.com>:
## Quick question for a regular expression-
##
## What is the most elegant way to extract the word after a specific word in a
## string (words seperated by one space)? For example, if the string is "The
## quick brown fox jumps over the lazy dog", given "brown", I want to return
## "fox". In my situation, each word will only appear once in the string. I
## appreciate all your input.
sub find_next_word {
my ($word, $string) = @_;
for (my ($i, @words) = (0, split / / => $string); $i < @words; ) {
last if $words [$i ++] eq $word;
}
return $words [$i];
}
Abigail
--
%0=map{reverse+chop,$_}ABC,ACB,BAC,BCA,CAB,CBA;$_=shift().AC;1while+s/(\d+)((.)
(.))/($0=$1-1)?"$0$3$0{$2}1$2$0$0{$2}$4":"$3 => $4\n"/xeg;print#Towers of Hanoi
------------------------------
Date: Tue, 02 Mar 1999 11:01:51 -0800
From: Jerome O'Neil <jeromeo@atrieva.com>
Subject: Re: How to interrupt a foreach loop
Message-Id: <36DC359F.C7FCF360@atrieva.com>
Lionel ANDRE -- Provence Shop Webmaster wrote:
>
> I'm a PERL toddler, and I would like to know if there is a way to
> interupt a foreach loop.
Yes. Check the documentation for 'next', which will terminate this
iteration of a loop, and continue iterating, and 'last' which which will
exit a loop immediately.
Find out all the exciting detail on next, last and other flow control
related functions in the perlfunc documentation that came with your
distribution. You might also want to read the 'Loop Control' section of
perlsyn.
Good Luck!
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: Tue, 2 Mar 1999 11:25:49 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: How to interrupt a foreach loop
Message-Id: <MPG.1145db1aa07be19a9896c1@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <7bhad3$d91$1@news-1.news.gte.net> on Tue, 02 Mar 1999
13:35:09 -0500, Lionel ANDRE -- Provence Shop Webmaster
<webmaster@provence-shop.com> says...
> I'm a PERL toddler, and I would like to know if there is a way to
> interupt a foreach loop.
perldoc -f last
--
Larry Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Tue, 02 Mar 1999 17:16:32 +0300
From: Sergey Ivanov <sergey@callcenter.ru>
Subject: How to parse telephone numbers from string
Message-Id: <36DBF2C0.6DA35307@callcenter.ru>
I did it this way:
$_ = $string_to_parse;
my $tel;
for $tel (/(\d\d\d\-\d\d\-\d\d)/gc) {
## $tel processing
}
Can anybbody give me a better advise?
WBR, Sergey Ivanov
------------------------------
Date: Tue, 2 Mar 1999 19:32:59 GMT
From: Steven Parker <sparker@wash.inmet.com>
Subject: Re: How to run cgi automatically?
Message-Id: <36DC3CEB.42EA6D41@wash.inmet.com>
Michalowski, Martin wrote:
> I want to run my perl cgi as soon as I open the page. Is that possible?
> --
> Martin @ 799.2775
Yes, this is possible. You can call a cgi directly if you wish (i.e., the
page you are retrieving is really a cgi which itself produces and returns
the webpage).
Or, you can use Server Side Includes in your HTML. SSIs are scripts which
are executed by the server before the page is served out. For instance,
an SSI which computes the current time might be included in a page. Thus,
whenever that page is visited, the current time is displayed. SSIs are
just like CGIs except that they execute before the page is served out.
-steve
------------------------------
Date: 2 Mar 1999 19:17:27 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Is there a more efficient routine?
Message-Id: <7bhdg7$da3$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to M.J.T. Guy
<mjtg@cus.cam.ac.uk>],
who wrote in article <7bhc3m$ho4$1@pegasus.csx.cam.ac.uk>:
> >Perl file locking is merely advisory.
[It is not, but this is a different topic.]
> >if(flock(DB,LOCK_EX)){
> > #Blah blah blah...
> >}else{
> > #Do what we do when we can't flock together...
> >}
>
> While it's good general practice to check the results of system calls,
> that seems a bit pointless here. My flock(2) man page says
Sorry for this, but who cares about your man pages?
> ERRORS
> EBADF The argument fd is an invalid descrip-
> tor.
>
> EOPNOTSUPP The argument fd refers to an object
> other than a file.
>
> EWOULDBLOCK The file is locked and the LOCK_NB
> option was specified.
>
> I don't see how any of those can happen (in this case) unless Perl or
> the operating system is broken.
So if an OS does not follow *your* manpages, it is broken?
Btw, it is quite easy to have an invalid descriptor in Perl. It is
easy to get a pipe open instead of a file (since we do not have 3-args
open() yet). And Perl on OS/2 can return also ENOLCK, EINVAL, EINTR.
Hmm, I wonder whether EINTR is a bug or may cause a bug...
Should flock() be interruptable by signal? [Cc to Rocco who wrote flock()]
Ilya
------------------------------
Date: Tue, 02 Mar 1999 13:58:40 -0500
From: Thomas Scott Turner <thomas.s.turner@delphiauto.com>
Subject: Is there a way to load BLOB into a LONG RAW field using PERL, maybe via DBI/DBD?
Message-Id: <36DC34DF.120948E@delphiauto.com>
Has anyone ever used PERL to load a BLOB (Binary Large Object) into a
Long Raw field of a relational database? How can I do this without
actually having to write a C/C++ application that utilizes the database
API library?
Ive got a large web based application written in Perl that does HTML
rendering via the CGI and has an Oracle 7.3.4 RDBMS as its data source.
Ive been using DBI/DBD and embedded SQL statements in the Perl code to
perform the needed data access. I would like to be able to store files
directly in Oracle but cant seem to find an easy way to get them into
and out of the database. If anyone has any experience with doing this
and would like to help me out please let me know how (or if) this can be
done in Perl.
Thanks in advance,
Scott Turner
Delphi Automotive Systems
thomas.s.turner@delphiauto.com
------------------------------
Date: Tue, 02 Mar 1999 20:09:46 +0100
From: Staffan Liljas <staffan@ngb.se>
Subject: Re: logically impaired
Message-Id: <36DC377A.EFC0AA1A@ngb.se>
Jonathan Feinberg wrote:
> Staffan Liljas <staffan@ngb.se> writes:
> > > open FILE or die "$FILE $!";
> > I don't think this opens the file.
> Why don't you think so?
Because I'm stupid, and I'm currently working my way towards the record
for supplying the most incorrect information to clp.misc in a day.
Sorry. I though he needed a $ before FILE, but I was off course dead
wrong. Again, I apologise and this time I slowly melt into a pool of
oozing imbecilness. There is NO excuse for not reading the manuals
before replying or not trying the code out. Bad boy.
My only excuse is that I'm currently forced to do table-oriented
programming. ;-( GAAAAAAAH!
Staffan
------------------------------
Date: 2 Mar 1999 19:18:16 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: method overriden!
Message-Id: <7bhdho$j05$1@pegasus.csx.cam.ac.uk>
Ekkis <ekkis@arix.com> wrote:
>It seems that when I inherit from a class, if I create a method with the
>same name as one of the base class's methods, the base class loses access to
>it's own method! Consider the following (see 3 files below): a call to
>c2->new() generates a call to the base class constructor c1->new() which
>calls its helper sub init(). That call ($self->init()) should resolve to
>c1->init(), but doesn't!! instead c2->init() gets called. Thus when
>c1->new() returns and c2->new() continues and calls ITS own init(),
>c2->init() is called for a second time. Can someone explain to me why? and
>what can be done to protect the base class's access to it's own methods?
$self->init(@_) calls the init method for the object $self; since $self
is of class c2, this is the subroutine c2::init.
You probably want to write
$self->c1::init(@_);
to ensure that the init method for class c1 is called.
Mike Guy
------------------------------
Date: Tue, 02 Mar 1999 14:40:23 -0600
From: Philip Parker <philipNOSPAM@hrsites.com>
Subject: Re: Occasional Perl failure(?) question...
Message-Id: <36DC4CB7.52F8C114@hrsites.com>
Thanks, but I'm not really looking to take up anyone's time with a diagnosis.
Just wanted to see if anyone else has had a similar experience. I will post
code if this happens again.
------------------------------
Date: Tue, 2 Mar 1999 13:49:04 -0700
From: kenny@kacweb.com (Kenny Chaffin)
Subject: Re: Pentium III Chips Released with IDs - Intel won't budge
Message-Id: <MPG.1145fcae3a6fd79998a8ca@news.dimensional.com>
In article <2uilnhg3to1.fsf@ptrs14.srl.ford.com>,
mtiller@ptrs14.srl.ford.com says...
> Christopher Nelson <chris@pinebush.com> writes:
>
> > Kenny Chaffin wrote:
> >
> > > Well you may not want to admit it, but it will affect you or your
> > > customers/clients/company....
> > > And as far as not buying it, that would be great if intel/microsoft
> > > didn't have a monopoly on the pc market....
> >
> > What monopoly? I've got an AMD chip in my PC.
>
> Exactly. Anybody who thinks Intel is a monopoly just doesn't know the
> facts.
>
> Just yesterday on CNN, they said, excluding business PCs, AMD sold
> *more* processors than Intel for use in desktop PCs. In fact, Intel
> was recently downgraded by somebody because of projected lower profits
> due to AMD. The only good thing for Intel is that the FTC won't come
> after them with an anti-trust lawsuit so long as this keeps up.
>
> > Chris
> > --
> > Rens-se-LEER is a county. RENS-se-ler is a city. R-P-I is a school!
>
> --
> Michael Tiller
> Ford Motor Company
>
Yep, and Intel is paid a royalty on every one!
--
KAC Website Design
Custom Programming, Web Design, and Graphics
kenny@kacweb.com - http://www.kacweb.com
------------------------------
Date: Tue, 2 Mar 1999 14:21:08 -0600
From: "Rob Lemley" <RobLemley@nospam.com>
Subject: Perl 5 for Intergraph CLIX workstation?
Message-Id: <BRRcolOZ#GA.181@pet.hiwaay.net>
Has anyone built Perl 5 for Intergraph CLIX (unix sysv) Workstations?
Thanks.
------------------------------
Date: Tue, 02 Mar 1999 13:51:05 -0600
From: Shane Brath <sbrath@tds.net>
Subject: Perl 5.00x and GDBM latest coexist with C?
Message-Id: <36DC4129.DF58A7E0@tds.net>
I have been trying to write a perl program to build a gdbm file to be
used by a C program.
I know I can write both in c and make this work, but certian instalation
restrictions requires access
to the gdbm file via perl and C.
Every time I create a database in perl, I can open it in C, but
gdbm_fetch for an item in the database never works. If I add a row with
C and then go back to perl and have it fetch if finds the original row
inserted via perl.
It's like they co-exist in the same file, but they can't fetch the data
the other inserted?
I am on Solaris 7, with latest GDBM and PERL code. Just downloaded and
re-installed from gnu yesterday..
Has anyone else got this to work, or am I just missing some small piece
to this puzzle.
thanks..
------------------------------
Date: 2 Mar 1999 15:43:08 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: switch/case for Perl
Message-Id: <slrn7do1t6.e77.fl_aggie@enso.coaps.fsu.edu>
On Tue, 02 Mar 1999 15:07:57 GMT, Daniel Pfeiffer
<occitan@esperanto.org> wrote:
+ I suppose this forum has seen the discussion before, but here goes: I find
+ the lack of a switch/case statement rather annoying, and all of the
+ alternatives shown in the camel book are more than kludgy. Perl being a
+ better language than others, it deserves a better switch-statement!
Sez you. Others disagree.
+ -----------== Posted via Deja News, The Discussion Network ==----------
+ http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
Perhaps if you had done a Dejanews search on this newsgroup with a subject
of "switch" or "case" you might have been able to read about the previous
iterations of this particular topic...
James
------------------------------
Date: Tue, 02 Mar 1999 18:50:49 +0000
From: Bill Anderson <banderson@boi.hp.com>
Subject: Re: The truth about the Pentium III chip and ID --- **boycott info**
Message-Id: <36DC3309.7C6F5A83@boi.hp.com>
Bill Frisbee wrote:
>
> John Kenyon <etljwk@etl.x.dmx.ericsson.se> wrote in message
> news:36DC1106.5DCDC5A9@etl.x.dmx.ericsson.se...
> >George Bonser wrote:
> >>
> >> Oh, give it a break. Every Sun SPARC or UltraSPARC machine ever built has
> a
> >> CPU serial number. So do most other brands of high-end machines. This is
> >> nothing new.
> >
> >You mean the host id, which is held in NVRAM, (which can be modified),
> >which was designed to allow licensing of software, rather than the
> >tracking of the person who was using it.
> >
> >The fact is that host id's existed a longtime before the Internet
> >went "mainstream". Given the current rate of "dumbing down" of
> >functionality, it is only a matter of time until this "host id"
> >techology gets misused.
>
> Bah... Sun knows EVERYTIME I turn my system on tracked by that host id which
> is PART of the CPU and hardcoded to the CPU.
>
> BTW it is a Ultra5 not really a high end machine, yet the cpu ID is easily
> retrieved by Sun. Intel is doing nothing new.
>
> Bill F.
What Stalin and Hitler did was nothing new, either.
Just because others are doing it, does not make it right.
Bill
------------------------------
Date: Tue, 02 Mar 1999 11:37:36 -0800
From: Jerome O'Neil <jeromeo@atrieva.com>
Subject: Re: The truth about the Pentium III chip and ID --- **boycott info**
Message-Id: <36DC3E00.C3DB1BA2@atrieva.com>
Bill Anderson wrote:
> What Stalin and Hitler did was nothing new, either.
> Just because others are doing it, does not make it right.
Goodwin's Law, proved again. You loose.
<*plonk*>
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: Tue, 02 Mar 1999 20:52:40 GMT
From: juergen@monocerus.demon.co.uk (Juergen Heinzl)
Subject: Re: The truth about the Pentium III chip and ID --- **boycott info**
Message-Id: <slrn7dojqi.56.juergen@monocerus.demon.co.uk>
In article <36DC3309.7C6F5A83@boi.hp.com>, Bill Anderson wrote:
>Bill Frisbee wrote:
[...]
>What Stalin and Hitler did was nothing new, either.
>Just because others are doing it, does not make it right.
Aside from posting this crap all over ... but all right, Stalin, Hitler
and the Nazis ... seems like the typical lowest point of every news
thread has just been reached again; something that makes me hopeful.
If you do not like it do not buy a PIII ... no-one than the rest of
the world could care less about that.
------------------------------
Date: 2 Mar 1999 20:00:53 GMT
From: "Cameron Spitzer" <olivaw@writeme.com>
Subject: thread is over, Re: The truth about the Pentium III chip and ID --- **boycott info**
Message-Id: <7bhg1l$5s$1@samba.rahul.net>
What's this got to do with Linux?
In article <36DC3309.7C6F5A83@boi.hp.com>, posted in Newsgroups:
comp.lang.perl.misc,
comp.mail.sendmail,
comp.os.linux.networking,
comp.os.linux.setup, and
comp.os.ms-windows.advocacy
Bill Anderson <banderson@boi.hp.com> wrote:
>Bill Frisbee wrote:
>> John Kenyon <etljwk@etl.x.dmx.ericsson.se> wrote in message
>> news:36DC1106.5DCDC5A9@etl.x.dmx.ericsson.se...
>> >George Bonser wrote:
>> >> Oh, give it a break. Every Sun SPARC or UltraSPARC machine ever built has
>> >You mean the host id, which is held in NVRAM, (which can be modified),
>> Bah... Sun knows EVERYTIME I turn my system on tracked by that host id which
>What Stalin and Hitler did was nothing new, either.
Obc.o.l.networking: Stalin and Hitler would have hated Linux and the
copyleft. And they would have hated networks. And when they were done
with the queers, the mentally ill, the communists, the union
organizers, the blacks, and the Jews, they would have come after the
code hackers.
Cameron
http://petra.greens.org/~cls/
------------------------------
Date: Tue, 02 Mar 1999 20:35:58 GMT
From: jfv@capgroup.com
Subject: translating a hex/int value to a string of bits.
Message-Id: <7bhi3e$e79$1@nnrp1.dejanews.com>
I'm working on a Sybase system where some data is returned as a hex value
which needs to be translated to a bitmap. I found an example at the
language.perl.com site where the following technique is used:
bitstring = join('',unpack('B*',"\x29")); ( 00101001)
Yet as much as I try, I cannot get "assigned" values to work. For example
$x="\\x29";
join('',unpack('B*',"$x")); will result in 01011100011110000011001000111001
what am I not getting ?
Thanks --jim
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Tue, 2 Mar 1999 11:45:31 -0800
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Variables in regular expressions
Message-Id: <MPG.1145dfbb8e05594f9896c2@nntp.hpl.hp.com>
In article <7bh7bv$qqd$1@camel19.mindspring.com> on Tue, 2 Mar 1999
12:39:24 -0500, Allan M. Due <Allan@due.net> says...
...
> Anyway, in the script below if I use
> my $match = "$foo";
> then $match = 'oo' and there is a successful match.
>
> if I use
> my $match = "\\\$foo";
> Then $foo becomes the literal '$foo' and I match. All well and good.
Not so. $foo becomes the literal '\$foo' and it doesn't match.
> But what would $match = "\$foo" actually match? I have tried modifying
> $string in all kinds of ways
> my $string = '\$foo';
> my $string = "\$foo";
> and I never get a match to \$foo. Can someone shed some light on what is
> going on here? What would $match = "\$foo"; match?
'$foo'
> #!/usr/local/bin/perl -w
> use strict;
> my $string = '$foo';
> my $foo = 'oo';
>
> #my $match = "$foo"; # $match = $foo = 'oo' so we match
> #my $match = "\\\$foo"; # $match = '$foo' so we match
> my $match = "\$foo"; # What would this match in $string?
>
> print "$match\n";
> print "$1\n" if $string =~ /($match)/;
#!/usr/local/bin/perl -w
use strict;
my $string = '$foo';
my $foo = 'oo';
for my $match (
"$foo", # $match = $foo = 'oo' so we match
"\\\$foo", # $match = '$foo' so we match
"\$foo", # What would this match in $string?
) {
print "$match\n";
print "$1\n" if $string =~ /($match)/;
}
__END__
Output:
oo
oo
\$foo
$foo
$foo
--
Larry Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 12 Dec 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 Dec 98)
Message-Id: <null>
Administrivia:
Well, after 6 months, here's the answer to the quiz: what do we do about
comp.lang.perl.moderated. Answer: nothing.
]From: Russ Allbery <rra@stanford.edu>
]Date: 21 Sep 1998 19:53:43 -0700
]Subject: comp.lang.perl.moderated available via e-mail
]
]It is possible to subscribe to comp.lang.perl.moderated as a mailing list.
]To do so, send mail to majordomo@eyrie.org with "subscribe clpm" in the
]body. Majordomo will then send you instructions on how to confirm your
]subscription. This is provided as a general service for those people who
]cannot receive the newsgroup for whatever reason or who just prefer to
]receive messages via e-mail.
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 5035
**************************************
