[13346] in Perl-Users-Digest
Perl-Users Digest, Issue: 756 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Sep 10 05:07:21 1999
Date: Fri, 10 Sep 1999 02:05:10 -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 Fri, 10 Sep 1999 Volume: 9 Number: 756
Today's topics:
Corrupted disk writes with SDBM <mattking@techie.com>
Corrupted disk writes with SDBM <mattking@techie.com>
Corrupted disk writes with SDBM <mattking@techie.com>
Re: Error when calling system command via Apache <jpeterson@office.colt.net>
Re: Format an variable <agray@infoscience.otago.ac.nz>
Re: Good way to learn PERL <agray@infoscience.otago.ac.nz>
Re: Help! HTTP500 error when running Perl script on Fro <gilbert@yahoo.com>
HELP!! 'Permission dennied' <luis@internorte.net>
how to mkdir on NT with Perl (Randy)
Re: how to mkdir on NT with Perl (elephant)
Re: How to send control codes from Expect module (Kragen Sitaker)
Re: LWP: Get <makkulka@cisco.com>
Re: mastering algorithms a munition? (elephant)
Re: mastering algorithms a munition? <rra@stanford.edu>
Re: mastering algorithms a munition? (elephant)
Re: mastering algorithms a munition? <rra@stanford.edu>
Re: mastering algorithms a munition? (elephant)
Re: MSQL.pm Please Help <jpeterson@office.colt.net>
Non-blocking I/O? <trond@moesarc.no>
Re: Old Script Doesn't Like My New Perl? Help! (Bart Lateur)
Printing characters in reverse-video to screen <kvaid@mipos2.intel.com>
Re: Removing a line from a text file (Marc Haber)
Re: Review of Object Oriented Perl by Damian Conway (Larry Rosler)
Re: Services in Perl <c4jgurney@my-deja.com>
Re: Sorting by mid-record without splitting? (Larry Rosler)
Re: teen angst. (Remco Gerlich)
Re: Will an apology end this mess? <jpeterson@office.colt.net>
Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 9 Sep 1999 16:55:08 +0200
From: "Matt King" <mattking@techie.com>
Subject: Corrupted disk writes with SDBM
Message-Id: <7radh8$11vi$1@news.uk.ibm.com>
Hello. I have a perl script that takes web based input, and saves this to a
SDBM file. Although I have no problems reading and writing to the files,
there aprears to be a bug in the module. What happens is, is that I create
several 'records' in this file and some of the records start 'disapearing'.
I used Norton commander for DOS to look at the contence of the SDBM file,
and where the information was supposed to be, there was a bunch of html
code. The html code is comming from files that were deleted from the hard
drive recently, and not from the script it's self (different contence).
I'm using Active Perl 5.19 for Win32. The OS in Windows 98 and the server is
Apache 1.3.6 for Win32.
If this isn't the correct place for this, please direct me to the correct
comp group. Thanks for your help.
Matt
------------------------------
Date: Thu, 9 Sep 1999 16:55:08 +0200
From: "Matt King" <mattking@techie.com>
Subject: Corrupted disk writes with SDBM
Message-Id: <7radim$11om$1@news.uk.ibm.com>
Hello. I have a perl script that takes web based input, and saves this to a
SDBM file. Although I have no problems reading and writing to the files,
there aprears to be a bug in the module. What happens is, is that I create
several 'records' in this file and some of the records start 'disapearing'.
I used Norton commander for DOS to look at the contence of the SDBM file,
and where the information was supposed to be, there was a bunch of html
code. The html code is comming from files that were deleted from the hard
drive recently, and not from the script it's self (different contence).
I'm using Active Perl 5.19 for Win32. The OS in Windows 98 and the server is
Apache 1.3.6 for Win32.
If this isn't the correct place for this, please direct me to the correct
comp group. Thanks for your help.
Matt
------------------------------
Date: Thu, 9 Sep 1999 16:55:08 +0200
From: "Matt King" <mattking@techie.com>
Subject: Corrupted disk writes with SDBM
Message-Id: <7radl2$183k$1@news.uk.ibm.com>
Hello. I have a perl script that takes web based input, and saves this to a
SDBM file. Although I have no problems reading and writing to the files,
there aprears to be a bug in the module. What happens is, is that I create
several 'records' in this file and some of the records start 'disapearing'.
I used Norton commander for DOS to look at the contence of the SDBM file,
and where the information was supposed to be, there was a bunch of html
code. The html code is comming from files that were deleted from the hard
drive recently, and not from the script it's self (different contence).
I'm using Active Perl 5.19 for Win32. The OS in Windows 98 and the server is
Apache 1.3.6 for Win32.
If this isn't the correct place for this, please direct me to the correct
comp group. Thanks for your help.
Matt
------------------------------
Date: Fri, 10 Sep 1999 08:49:54 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: Error when calling system command via Apache
Message-Id: <SC3C3.110$xa4.1397@news.colt.net>
Phil Griffiths <phil@surfacing93.freeserve.co.uk> wrote:
> To assist in the administration of a remote server running RedHat 6.0, I am
> using the following script to shut it down via a browser.
> system("su -c poweroff");
This is not a Perl problem. Unless RedHat has a very different su command,
the command you are trying to execute is wrong anyway. Read the man page
for su again - you normally need to supply a username, and unless you are
running the web server as root, you'll need to supply a password at the
prompt. In order to supply a password you would need to invoke the command
as a file open operation (on a pipe to the command) and print the password
to the file handle.
But really, this is an issue of Unix administration, not Perl. Perl is the
easy part of what you are trying to do!
------------------------------
Date: 10 Sep 1999 17:37:13 +1200
From: Andrew Gray <agray@infoscience.otago.ac.nz>
Subject: Re: Format an variable
Message-Id: <ulnaf9vjq.fsf@infoscience.otago.ac.nz>
"Rich Harris" <rich.harris@#prodigy.net> writes:
> Flip, how the heck to for format a variable.
> I guess you use printf %something or another?!!??!!??
> Help with the syntax please.
Have a look at "perldoc -f printf" and (for the details) "perldoc -f
sprintf". The former controls the output, while the other produces a
formatted string (which can then be output if you wish).
So, for example,
#!/usr/bin/perl -w
use strict;
my $value=109.762762;
my $rounded_value = sprintf("%10.1f",$value);
print $rounded_value."\n";
printf ("%10.1f\n",$value);
produces as output
109.8
109.8
which may be similar to what you're looking for.
Cheers,
Andrew
------------------------------
Date: 10 Sep 1999 17:58:30 +1200
From: Andrew Gray <agray@infoscience.otago.ac.nz>
Subject: Re: Good way to learn PERL
Message-Id: <uiu5j9uk9.fsf@infoscience.otago.ac.nz>
"Jim Carison" <matthew357@hotmail.com> writes:
> Hello. I am fairly new to PERL and CGI. Although I understand enough to make
> small scripts that do a little bit of stuff, I am interested in making my
> skills good enough to use on the commercial level. If you can give me any
> information as to how I can learn PERL much better without a lot of upfront
> costs (like IT schools) but things like webpages or good books.
First, around here the locals don't say "PERL". They say, usually,
perl (for the compiler) and Perl (for the language). It really does
look much nicer that way.
Secondly, perl comes with all the documentation you really need. The
perldoc pages (accessed by typing perldoc followed by whatever you
want to know about, try perldoc perldoc first which will also give you
the command line options for various types of search).
As far as learning Perl goes, read the perldoc pages as much as you
can (with a little luck you will also have them in HTML which is a
much nicer format to browse). For books see "perldoc perlbooks" and
"perldoc perlfaq3". The best books are all listed there, although
there are few new books still to be added.
But at the end of the day there really is no substitute for fooling
around with programs and seeing what happens when you try things.
Even if you only want to learn Perl for CGI, I'd still suggest writing
both (some) CGI and (mostly) non-CGI programs.
Also, you might want have a look at www.perl.com (some great articles)
and www.cpan.org (to save yourself reinventing the wheel).
Cheers,
Andrew
------------------------------
Date: Fri, 10 Sep 1999 13:45:10 +0800
From: "gilbert" <gilbert@yahoo.com>
Subject: Re: Help! HTTP500 error when running Perl script on Frontpage
Message-Id: <7ra5sl$pg1@imsp212.netvigator.com>
I found the error log. It says "httpd: could not create new process: 193"
gilbert <gilbert@yahoo.com> wrote in message
news:7r80t5$g3f1@imsp212.netvigator.com...
> Please help, why I can't run the perl script on frontpage?
> The following step have been done.
>
> 1. perl script was located at frontpage's cgi-bin, both cgi-bin & local
are
> checked with "Allow Script or Program to be run"
> 2. Frontpage pws was on.
> 3. regedit's ScriptMap .pl was added and pointed to local perl.exe %s %s.
>
>
------------------------------
Date: Fri, 10 Sep 1999 10:44:51 +0200
From: "Luis Toyos" <luis@internorte.net>
Subject: HELP!! 'Permission dennied'
Message-Id: <7ragb8$c88$1@talia.mad.ttd.net>
Hi folks;
I need some help;
My system is : Solaris UNIX; Perl version 5.004_04 built for
sun4-solaris ;Apache 1.3.3
I am trying to execute an open(FILE,">file.dat") from a CGI and the
system returns a 'Permission dennied'.
I was trying to do a 'chmod 777 directory'; (file.dat is @ directory),
but
it does not work
Thanks
Please, answer me at my email...
Luis Toyos
luis@internorte.net
------------------------------
Date: Fri, 10 Sep 1999 07:00:41 GMT
From: randys@dowco.com (Randy)
Subject: how to mkdir on NT with Perl
Message-Id: <37d8ac10.92012574@news.dowco.com>
Hi,
I would like to know if there is a way i could create or edit
directories in NT with Perl?
thank you!
------------------------------
Date: Fri, 10 Sep 1999 18:10:58 +1000
From: elephant@squirrelgroup.com (elephant)
Subject: Re: how to mkdir on NT with Perl
Message-Id: <MPG.12434c00299f011e989cc0@news-server>
Randy writes ..
>Subject: how to mkdir on NT with Perl
>I would like to know if there is a way i could create or edit
>directories in NT with Perl?
I want to live in a world where I could correctly assume that this is a
joke
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: Fri, 10 Sep 1999 04:16:00 GMT
From: kragen@dnaco.net (Kragen Sitaker)
Subject: Re: How to send control codes from Expect module
Message-Id: <4C%B3.1316$N77.80955@typ11.nn.bcandid.com>
In article <7r93oa$ugl$1@nnrp1.deja.com>, Bill <wpflum@my-deja.com> wrote:
>not sure what is happening, it should have sent the contol sequence for
>the 'Do' key but nothing happens and to top it off if I press any of
>the control keys including the 'Do' key I get the ascii representation
>on the screen instead of continuing on.
I'm not sure about this problem, because I haven't used Expect.pm, but
> What am I missing? I'm
>sending the last command using a print $telnet chr(0x1b) & chr(0x5b) &
>chr(0x32) & chr(0x39) & chr(0x7e);
& is bitwise-and.
perl -e 'print chr(0x1b) & chr(0x5b) & chr(0x32) & chr(0x39) & chr(0x7e)' | cat -vt yields
^P
. . . one character, control-P.
You might consider using ., the string catenation operator, or just
writing "\x1b\x5b\x32\x39\x7e" -- or even "\x1b[29~", or just "\e[29~";
all of these are equivalent.
Let me know if this makes any difference :)
Kragen
--
<kragen@pobox.com> Kragen Sitaker <http://www.pobox.com/~kragen/>
Thu Sep 09 1999
60 days until the Internet stock bubble bursts on Monday, 1999-11-08.
<URL:http://www.pobox.com/~kragen/bubble.html>
------------------------------
Date: Thu, 09 Sep 1999 20:52:04 -0700
From: Makarand Kulkarni <makkulka@cisco.com>
Subject: Re: LWP: Get
Message-Id: <37D88064.66E5B255@cisco.com>
[ Susan Malmrose wrote:
> I need to use LWP and the get function to pull several text files from an
> outside server, however I need them to all end up as one text file on my
> server. I'm completely new to Perl. Can anyone give me an example or point
> me to some resources that will show examples of how to code for something
> like this?
perldoc LWP::Simple
perldoc LWP::UserAgent
perldoc HTTP::Request
perldoc HTTP::Response
perldoc URI::URL
have more than enuff sample code to do your task. The text files
will end up separately in your script and then you will have to concatenate
then yourself.
Try using as_string () or content () in HTTP::Response to get at the HTML/text
content.
--
------------------------------
Date: Fri, 10 Sep 1999 15:34:46 +1000
From: elephant@squirrelgroup.com (elephant)
Subject: Re: mastering algorithms a munition?
Message-Id: <MPG.124327622d2d5299989cbd@news-server>
Jonathan Stowe writes ..
>David Turley <dturley@pobox.com> wrote:
>>
>> On page 549 the RSA algorithm in Perl is printed, along with a warning
>> that t-shirts, etc with this printed on them are classed as munitions by
>> the US. So, does this mean that this book is also a munition?
>
>Apparently books are exempt - the international version of PGP was taken
>from code OCR'd from a book ;-}
according to NAI - only 'electronic' exports of the algorithm are
covered by the US restriction
so t-shirts are also exempt *8^) .. begs the question where the line is
drawn .. a t-shirt being worn on US soil and viewed from Mexico is
transmitting the algorithm via light .. so can I draw the algorithm from
a US based laser on a wall in Mexico ? .. can I draw it on the moon ? ..
could I bounce the ASCII codes for the algorithm via binary on/off
signals off the moon ? .. could I change the wavelength and use radio
waves instead of light waves ? .. could I bounce those off a satelite
instead of off the moon ?
stupid laws
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: 09 Sep 1999 21:54:42 -0700
From: Russ Allbery <rra@stanford.edu>
Subject: Re: mastering algorithms a munition?
Message-Id: <ylpuzr4b8t.fsf@windlord.stanford.edu>
elephant <elephant@squirrelgroup.com> writes:
> so t-shirts are also exempt *8^) .. begs the question where the line is
> drawn .. a t-shirt being worn on US soil and viewed from Mexico is
> transmitting the algorithm via light .. so can I draw the algorithm from
> a US based laser on a wall in Mexico ? .. can I draw it on the moon ? ..
> could I bounce the ASCII codes for the algorithm via binary on/off
> signals off the moon ? .. could I change the wavelength and use radio
> waves instead of light waves ? .. could I bounce those off a satelite
> instead of off the moon ?
> stupid laws
The purpose of the laws is not to unambiguously state what you can and
cannot do in order to enforce some principle. The purpose of the laws is
to spread FUD and difficulties for anyone who tries to use encryption, in
order to have the long term effect of generally lowering the *widely used*
levels of encryption and preventing companies from taking full advantage
of it and making it the default and a standard. This is done in turn to
maintain the government's ability to spy on average traffic.
The laws are quite effective. They're accomplishing exactly what they're
designed to accomplish.
--
#!/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: Fri, 10 Sep 1999 16:47:26 +1000
From: elephant@squirrelgroup.com (elephant)
Subject: Re: mastering algorithms a munition?
Message-Id: <MPG.1243386a6eaf9783989cbe@news-server>
Russ Allbery writes ..
>elephant <elephant@squirrelgroup.com> writes:
>
>> so t-shirts are also exempt *8^) .. begs the question where the line is
>> drawn .. a t-shirt being worn on US soil and viewed from Mexico is
>> transmitting the algorithm via light .. so can I draw the algorithm from
>> a US based laser on a wall in Mexico ? .. can I draw it on the moon ? ..
>> could I bounce the ASCII codes for the algorithm via binary on/off
>> signals off the moon ? .. could I change the wavelength and use radio
>> waves instead of light waves ? .. could I bounce those off a satelite
>> instead of off the moon ?
>
>> stupid laws
>
>The purpose of the laws is not to unambiguously state what you can and
>cannot do in order to enforce some principle. The purpose of the laws is
>to spread FUD and difficulties for anyone who tries to use encryption, in
>order to have the long term effect of generally lowering the *widely used*
>levels of encryption and preventing companies from taking full advantage
>of it and making it the default and a standard. This is done in turn to
>maintain the government's ability to spy on average traffic.
average traffic of non-US based companies .. all of whom - thanks to
market forces - are able to obtain strong encryption from a handful of
companies doing a roaring trade in OCRed algorithms
those companies are the real beneficiaries of the export restrictions
>The laws are quite effective. They're accomplishing exactly what they're
>designed to accomplish.
I think you'd be surprised .. IMHO removing the laws and allowing any
Joe to build and electronically export their own encryption software
would create more FUD and difficulties for companies seeking good
encryption software
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: 09 Sep 1999 23:06:20 -0700
From: Russ Allbery <rra@stanford.edu>
Subject: Re: mastering algorithms a munition?
Message-Id: <ylhfl347xf.fsf@windlord.stanford.edu>
elephant <elephant@squirrelgroup.com> writes:
> average traffic of non-US based companies .. all of whom - thanks to
> market forces - are able to obtain strong encryption from a handful of
> companies doing a roaring trade in OCRed algorithms
Yet they're not using it on a widespread basis. Look at the real traffic
that's actually out there on the net. It's all using export-grade
encryption. Why? Because a huge percentage of the traffic is going to or
from the US, and companies that need to do international business are
involved.
You can get strong encryption, but it's not *prepackaged*. Which means
that 99% of people won't ever use it.
> I think you'd be surprised .. IMHO removing the laws and allowing any
> Joe to build and electronically export their own encryption software
> would create more FUD and difficulties for companies seeking good
> encryption software
Heh. I'm pretty sure not.
I'm very much in favor of strong encryption. I think what the US
government is doing is criminal (literally -- it's a violation of the US
1st Amendment, and Bernstein vs. DoJ will prove that eventually), but
those in favor of strong encryption need to stop fooling themselves and
come to terms with the fact that the government isn't stupid. If some law
appears to be completely nonsensical and counterproductive, take a closer
look. There are lots of perfectly intelligent people who figure out the
impact of these laws for the government and they're not blind.
--
#!/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: Fri, 10 Sep 1999 18:06:35 +1000
From: elephant@squirrelgroup.com (elephant)
Subject: Re: mastering algorithms a munition?
Message-Id: <MPG.12434af1d2825a93989cbf@news-server>
Russ Allbery writes ..
> ...but
>those in favor of strong encryption need to stop fooling themselves and
>come to terms with the fact that the government isn't stupid. If some law
>appears to be completely nonsensical and counterproductive, take a closer
>look. There are lots of perfectly intelligent people who figure out the
>impact of these laws for the government and they're not blind.
you're probably right
--
jason - elephant@squirrelgroup.com -
------------------------------
Date: Fri, 10 Sep 1999 08:38:52 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: MSQL.pm Please Help
Message-Id: <ws3C3.108$xa4.1397@news.colt.net>
CNspots <cnspots@mindspring.com> wrote:
> Could someone please tell me what is wrong with thiscode I have been racking
> my brains for a week and I still can't figure it out.. Also can anyone
> reccomend a good source for learning msql.pm Thanfs
> #!/usr/local/bin/perl
> use CGI;
> use Msql;
> use DBI;
Well, I'd start by inserting 'use strict;' as the second line in the program.
And I'd continue by appending ' -w' to the first line of the program.
> # CODE BREAKS HERE
It breaks, sure I believe you - but WHAT IS THE ERROR MESSAGE?? It's _really_
hard to debug without the error message.
------------------------------
Date: Fri, 10 Sep 1999 10:56:49 +0200
From: Trond =?iso-8859-1?Q?Kjern=E5sen?= <trond@moesarc.no>
Subject: Non-blocking I/O?
Message-Id: <37D8C7D1.4A053F4E@moesarc.no>
Hi,
can anyone explain to me how I can set a file descriptor to non-blocking
in ActivePerl under WindowsNT? I can't get the Fcntl module to work,
which
I've used successfully under Linux. The following error message is
printed
out:
"Your vendor has not defined Fcntl macro F_SETFL, used at ..."
Thanks,
--
Trond Kjernasen
------------------------------
Date: Fri, 10 Sep 1999 08:18:09 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Old Script Doesn't Like My New Perl? Help!
Message-Id: <37d9b4e4.1087844@news.skynet.be>
Dan Poynor wrote:
>I've tried the suggestions but have not been able to resolve this problem.
>I do notice attempting to run my script is creating a tmp file like such...
>
>tmp.2973 -> /home/httpd/foobar.com/slideshows/1250
>
>which is a link to the correct directory in the array but it doesn't change
>the name of the symbolic link named "current". It's like it's stuck for
>some reason.
Time for some diagnostic output! This is your code:
symlink($newlink, "tmp.$$");
rename("tmp.$$", "/home/httpd/foobar.com.com/current");
Change it to (print to whatever filehandle you find appropriate):
print STDERR "Name of new link = $newlink\n";
symlink($newlink, "tmp.$$") or die "Failed to symlink: $!";
rename("tmp.$$", "/home/httpd/foobar.com.com/current")
or die "Cannot rename: $!";
and it should tell you exactly why some of it fails. It could be a
file/directory permissions problem.
--
Bart.
------------------------------
Date: Thu, 09 Sep 1999 21:17:24 -0700
From: Kushagra Vaid <kvaid@mipos2.intel.com>
Subject: Printing characters in reverse-video to screen
Message-Id: <37D88653.1B82B99A@mipos2.intel.com>
Is it possible to use a sequence of escape characters (or some other method) in
Perl, to print out
a string of characters in reverse-video?
-KV
------------------------------
Date: Fri, 10 Sep 1999 06:51:58 GMT
From: Marc.Haber-usenet@gmx.de (Marc Haber)
Subject: Re: Removing a line from a text file
Message-Id: <7ra9qt$ccp$1@news.rz.uni-karlsruhe.de>
ebohlman@netcom.com (Eric Bohlman) wrote:
>Larry Rosler (lr@hpl.hp.com) wrote:
>: That is a reasonable analogy. However, in most likelihood those who ask
>: this question are using a different analogy: adding, deleting, or
>: modifying lines using a text editor or a word processor. There the
>: mechanism is hidden.
>
>Except that, especially if they're on a GUI system, they're aware that
>they have to explicitly save the file they're editing, which ought to
>suggest that the changes are actually done by rewriting the whole file.
If we had a file system that would support the opposite of sparse
files, deleting lines would be possible without rewriting the entire
file.
Greetings
Marc
--
-------------------------------------- !! No courtesy copies, please !! -----
Marc Haber | " Questions are the | Mailadresse im Header
Karlsruhe, Germany | Beginning of Wisdom " | Fon: *49 721 966 32 15
Nordisch by Nature | Lt. Worf, TNG "Rightful Heir" | Fax: *49 721 966 31 29
------------------------------
Date: Thu, 9 Sep 1999 23:40:15 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Review of Object Oriented Perl by Damian Conway
Message-Id: <MPG.124247ab69671a66989f40@nntp.hpl.hp.com>
In article <37D841B1.9FD5F97F@kasey.umkc.edu> on Thu, 09 Sep 1999
23:24:33 +0000, David L. Nicol <david@kasey.umkc.edu> says...
> Damian Conway's Object Oriented Perl,
>
> http://www.amazon.com/exec/obidos/ASIN/4812984231/tipjartransactioA/t
>
> is an excellent introduction to OO using Perl.
Undoubtedly. But your gratuitous posting of the review together with
the URL above, designed to get someone a commission on being clicked, is
in extraordinarily bad taste.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Fri, 10 Sep 1999 07:51:18 GMT
From: Jeremy Gurney <c4jgurney@my-deja.com>
Subject: Re: Services in Perl
Message-Id: <7rad9j$sqp$1@nnrp1.deja.com>
In article <1415c574.0de9d1ae@usw-ex0102-013.remarq.com>,
Aaron Lister <alister2NOfnSPAM@csc.co.nz> wrote:
> Anyone know how to create a service on a winnt platform in
> perl?
>
Win32::Service - offers control over the administration of system
services.
If you want to turn a perl script into a service that's a different
matter and involves using instsrv.exe and srvany.exe - do a search on
deja to find previous threads on this topic if you're interested.
HTH,
Jeremy Gurney
SAS Programmer | Proteus Molecular Design Ltd.
"Sometimes I think the so-called experts
actually are experts."
Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.
------------------------------
Date: Thu, 9 Sep 1999 23:47:32 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Sorting by mid-record without splitting?
Message-Id: <MPG.1242495e97772a77989f41@nntp.hpl.hp.com>
In article <Qf%B3.1270$N77.77252@typ11.nn.bcandid.com> on Fri, 10 Sep
1999 03:52:16 GMT, Kragen Sitaker <kragen@dnaco.net> says...
...
> my @lines = map {chomp; [split /\|/]} <>;
> print map { join ('~', @$_), "\n" } sort { $a->[2] cmp $b->[2] } @lines;
How odd to chomp off the newlines before sorting the records, then glue
them back on.
--
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: 10 Sep 1999 05:56:47 GMT
From: scarblac-spamtrap@pino.selwerd.cx (Remco Gerlich)
Subject: Re: teen angst.
Message-Id: <slrn7th77m.lcs.scarblac-spamtrap@flits104-37.flits.rug.nl>
George Reese <borg@imaginary.com> wrote:
> Martin <contact@nativetongues.com> wrote:
> : BUT THERE WERE TWO OTHER AUTHORS!!! Thought I'd point that little nugget
> : out... :-)
>
> Actually, three. And each of us wrote to our strengths. I to
> object-oriented database programming and the administration of MySQL
> and mSQL, Tim to database theory and design, and Randy to Perl, CGI,
> PHP, and W3-mSQL. It worked out well that way, IMHO.
So who is the third other author?
--
Remco Gerlich, scarblac@pino.selwerd.cx
7:53am up 23 days, 14:19, 6 users, load average: 1.29, 1.14, 1.04
------------------------------
Date: Fri, 10 Sep 1999 08:43:24 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: Will an apology end this mess?
Message-Id: <Mw3C3.109$xa4.1397@news.colt.net>
Robert Front <robertf@emerald.oz.net> wrote:
> Those of you upset with me, I have took the liberty of creating this mailto
> link you can use and I'll send you an honest appology.
> mailto:robertf@emerald.oz.net?subject=You are out of line&body=Your recent
> actions in the perl newsgroups are lame, please cease this activity at once.
Doh!! You were going so well until the end! Now, you'll have to endure endless
ranting on how HTML is wholly inappropriate on Usenet, how in any case it's
malformed HTML, how not all browsers support the subject and body arguments
to 'mailto:' etc. etc. etc.
:-)
------------------------------
Date: 1 Jul 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 1 Jul 99)
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.
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" from
almanac@ruby.oce.orst.edu. The real FAQ, as it appeared last in the
newsgroup, can be retrieved with the request "send perl-users FAQ" from
almanac@ruby.oce.orst.edu. 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" from
almanac@ruby.oce.orst.edu.
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 V9 Issue 756
*************************************
