[8161] in Perl-Users-Digest
Perl-Users Digest, Issue: 1779 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jan 31 20:07:48 1998
Date: Sat, 31 Jan 98 17:00:21 -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 Sat, 31 Jan 1998 Volume: 8 Number: 1779
Today's topics:
Re: 5 REAL languages (was: Re: AOL SPAM) <lovegod@earthling.net>
Re: Can PERL test for a process? (Michael Peck)
Re: Don't use signal handlers (was Re: Child processes) (Chip Salzenberg)
Re: Don't use signal handlers (was Re: Child processes) (Chip Salzenberg)
Re: easy question about ARGV <corky@ultranet.com>
Re: email address (Chip Salzenberg)
Re: fetching text not from STDOUT (pipe) (Chip Salzenberg)
File Upload question - using perl on IIS 3.0 (Win NT) (Rishi Pal)
Re: Forcing 7-digit number? (Chip Salzenberg)
Re: Garbage collection + Stack corruption (Chip Salzenberg)
Re: How do you make the something case-insensitive? (Chip Salzenberg)
Re: Internet Community needs cgi scripts like it needs (Michael Peck)
Re: Locking files (Chip Salzenberg)
Re: newbie stuck on null return for 0 (zero) user input <lovegod@earthling.net>
Re: newbie stuck on null return for 0 (zero) user input (I R A Aggie)
Re: OLE doesn't work (Chip Salzenberg)
Re: Parsing Word Docs <schwartz@cs.tu-berlin.de>
Re: Please don't hit me! (Jonathan Feinberg)
Re: send mail bug... ;( (Gabor)
Re: Survival Of perl <tchrist@mox.perl.com>
Re: Survival Of perl (Chris Nandor)
Re: TYP21D (was: substitute...) (Jeff Yoak)
Re: Using -w (Chip Salzenberg)
vadduser and CGI ppua@p3.net
why _open STDOUT, "> $fh"_ does not work? (Michael Wang)
Re: Win32: Any scripts to shut down all services? (Chip Salzenberg)
Digest Administrivia (Last modified: 8 Mar 97) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Sat, 31 Jan 1998 17:22:02 -0600
From: Rich Grise <lovegod@earthling.net>
Subject: Re: 5 REAL languages (was: Re: AOL SPAM)
Message-Id: <34D3B21A.7276@earthling.net>
Since this seems to be the SPAM thread, the truth of the matter
is that there is exactly one programming language:
Machine Language.
(well, OK, one per machine variation.)
The rest are translators.
Rich Grise, an old H/W Jock from before most of these people were born.
Adam Turoff wrote:
>
> In article <34CF45C5.95E@min.net>, John Porter <jdporter@min.net> wrote:
> >[...]
> >
> >This also confirms my suspicion that there are in fact only five
> >programming languages. (As if C and Java have anything in common
> >besides curly braces.)
>
> I assume you mean (not necessarily in order):
> C/C++/Java, FORTRAN, Assembly Language, COBOL, Lithp/Scheme.
>
> Where does perl fall into that list?
>
> Z.
------------------------------
Date: Sun, 01 Feb 1998 00:09:42 GMT
From: mpeck@pobox.com (Michael Peck)
Subject: Re: Can PERL test for a process?
Message-Id: <34d3af58.11200242@news.seicom.net>
On Fri, 30 Jan 1998 11:26:49 -0500, Shaun Ledford <shaun@ms.com>
wrote:
>Trying to write a script that will test whether a process exists.
Here is one example:
$myprog = '/usr/lib/sendmail' ; # This is the program to look for.
open(PS, "/usr/bin/ps -ef |") ;
while( <PS> ) {
if( $_ =~ /$myprog/ ) {
#process is running
$up = 1 ;
last ;
}
}
close(PS) ;
if($up) { `$myprog` }
Preferably, you would use system or exec, and not the backticks (if
the variable would even parse in them!?)
As with anything you want to do in Perl, you can do it *At Least* 3
ways. Any comments on the basic design of the above code is welcome,
as I am currently using something like this -- and always look forward
to improving my code, and my understanding.
Michael Peck
mpeck@pobox.com
------------------------------
Date: Sat, 31 Jan 1998 21:51:25 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Don't use signal handlers (was Re: Child processes)
Message-Id: <6b06gb$el1$1@cyprus.atlantic.net>
According to tchrist@mox.perl.com (Tom Christiansen):
>In comp.lang.perl.misc, chip@pobox.com writes:
>:>:Don't use Perl signal handlers. Ever.
>:>Now, kindly explain to the innocent bystanders
>:>when, where, and why that position is untenable.
>:Never. I'm quite serious.
>
>Did you know that every time you drive off in your car, there's
>provably a finite chance that some drunk will snatch your life away?
Yes, that's all very nice. I know all about risk assessment, thank
you. I do, after all, use Windows from time to time. :-/ There are
bugs; there are cosmic rays; there are power failures.
Nevertheless, *deliberately* using a language feature that can corrupt
your program, quite possibly making it do evil things like creating
files with the wrong names or invalid content, is, IMO, like choosing
to drive at 1:00am on New Year's Day down a street with a lot of bars
without a seatbelt and at high speed. It's an *un*acceptable risk.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 21:53:38 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Don't use signal handlers (was Re: Child processes)
Message-Id: <6b06kg$eln$1@cyprus.atlantic.net>
According to tchrist@mox.perl.com (Tom Christiansen):
>In comp.lang.perl.misc, chip@pobox.com writes:
>:Second, for applications that need signal handlers, it is entirely
>:safe to write an extension (a standard procedure for Perl coding) that
>:includes a signal handler written in C.
>
>Show us.
Come now. I can't show you all possible XSUBs that meet this
description.
>If you can't even handle SIGCHLD, then all is lost. SIGALRM
>and SIGINT are also important. Perhaps SIGCONT and SIGWINCH.
Like I said, you can do all those with XSUBs. You know that.
Why are you pretending not to understand me?
>Basically, you can throw away Perl for systems work. It's back
>to dumb awk crud.
Hyperbole serves no one's interests, except the person trying
to obfuscate the real issues. I hope that's not you.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 17:05:37 -0500
From: Bob Trieger <corky@ultranet.com>
Subject: Re: easy question about ARGV
Message-Id: <34D3A031.3729@ultranet.com>
> 'two' is a number. 'to' is a preposition.
> The name of the file in line one should be "/usr/printto.html".
>
> :-)
>
> Chipmunk
Then again Chipmunk, he may have printone.html and printthree.html for
other reasons.
Just my 2"
------------------------------
Date: Sun, 01 Feb 1998 00:00:18 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: email address
Message-Id: <6b0e23$f4d$1@cyprus.atlantic.net>
According to Eli the Bearded <*@qz.to>:
>($re = <<'EoRE') =~ tr:\n::d;
>(?:[\040\t]|\((?:[^\\\x80-\xff\n\015()]|\\[^\x80-\xff]|\((?:[^\\\x80-\xff\n
>\015()]|\\[^\x80-\xff])*\))*\))*(?:(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\
etc.
That's a great trick! Here documents end up with embedded newlines,
so if you don't want them, just use tr/// to get rid of them! Learn
Something New Every Day....
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sun, 01 Feb 1998 00:41:33 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: fetching text not from STDOUT (pipe)
Message-Id: <6b0gfb$f84$1@cyprus.atlantic.net>
According to Vegard Hanssen <vegardha@ifi.uio.no>:
>I want to fetch the text from the program, but how do I do it when the
>program not output the text to STDOUT?
perlfaq8:
How can I capture STDERR from an external command?
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 12:52:59 GMT
From: rpal@writeme.com (Rishi Pal)
Subject: File Upload question - using perl on IIS 3.0 (Win NT)
Message-Id: <34d31e76.7656990@news.erols.com>
I am trying ot upload graphics files through a browser (Netscape 4 or
IIS 4). I am doing this through a perl script running on MS-IIS 3.0
server (Win NT).
The files seem to upload, but the data is corruted. Additionally, the
script seems to create a temp. file in the directory the script
resides in (cgi-bin)
My code looks like this:
################################################
### Hearder Info
use CGI qw(:standard);
$CGI::OS = 'WINDOWS';
$query = new CGI;
### Retrieving image data
$Newimage = $query->param('newimage');
&upload_picture
### Subroutine to upload a file
sub upload_picture {
$outfile = "E:/InetPub/wwwroot/test/test_image";
open(OUTFILE, ">$outfile");
while ($bytesread = read($Newimage,$buffer,1024)) {
binmode(OUTFILE);
print OUTFILE $buffer;
}
close(OUTFILE);
}
################################################
I would appreciate any help on this topic. I've been struggling with
it for over a month now. Thank you so much in advance,
Rishi Pal
rpal@writeme.com
------------------------------
Date: Sun, 01 Feb 1998 00:08:06 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Forcing 7-digit number?
Message-Id: <6b0egp$f5a$1@cyprus.atlantic.net>
According to anthony@outshine.com (Anthony Boyd):
>No, I don't have access to the latest version. We're at 5.003 I think,
>and won't upgrade until the IS department obsessively tests 5.004.
The list of things in 5.003 that we fixed for 5.004 is *VERY* long.
Included in them are several buffer overflows, two of which have
security implications.
Don't let IS obsess. Upgrade.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 23:54:14 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Garbage collection + Stack corruption
Message-Id: <6b0dmp$f1i$1@cyprus.atlantic.net>
According to "Roger Marshall" <marshall@pindar.com>:
>My perl script runs on unix in the background and processes files that are
>dropped in directories. I'm hoping to let this perl script run indefinitely.
No problem.
>while ()
>{
> check_folders($folder1);
> check_folders($folder2);
> ..
>
> sleep 5;
>}
>
>will I have any problems with corruption of the stack - or garbage
>collection.
You shouldn't, modulo bugs, and I don't know of any memory leaks in
5.004_04 except those caused by syntax errors in parsing, and those
are modest.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 23:51:20 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: How do you make the something case-insensitive?
Message-Id: <6b0dh8$f01$1@cyprus.atlantic.net>
According to Stephen Miano <smiano@mindspring.com>:
>This is a multi-part message in MIME format.
>--------------64A5D51CBB02D49E3A441258
Don't.
Please, please don't.
>Content-Type: text/x-vcard; charset=us-ascii; name="vcard.vcf"
Stop it! Pretty please, stop it! Usenet is a text medium, and
binary droppings like just clutter it up.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sun, 01 Feb 1998 00:09:41 GMT
From: mpeck@pobox.com (Michael Peck)
Subject: Re: Internet Community needs cgi scripts like it needs ...
Message-Id: <34d3a76d.9173776@news.seicom.net>
On 30 Jan 1998 21:07:54 -0500, clay@panix.com (Clay Irving) wrote:
>In <6at7b5$b9r$1@cyprus.atlantic.net> chip@mail.atlantic.net (Chip Salzenberg) writes:
>
>>According to pudge@pobox.com (Chris Nandor):
>>>... a hole in the head ...
>>>... AlterNIC ...
>>>... spammers ...
>
>>... IRC bots ... (except purl!)
>>... broadcast ICMP replies ...
>>... old sendmails ...
>
>... Perl 4 questions ...
...NT Web Servers ...
------------------------------
Date: Sat, 31 Jan 1998 22:51:44 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Locking files
Message-Id: <6b0a15$eq4$1@cyprus.atlantic.net>
According to tchrist@mox.perl.com (Tom Christiansen):
>In comp.lang.perl.misc, BENJAMIN BERUBE <berub00@DMI.USherb.CA> writes:
>:My question is about locking file so that when I open a file, nobody
>:else can open it.
>
>Apparently you misunderstand locking. Locking a file blocks
>out other *lockers*, and no one else. No one.
.... unless, of course, your UNIX supports mandatory locks and they
are enabled on the given file. (Such enabling is sometimes done by
turning on the setgid bid on the target file, a bletcherous method
at best. You can thank the SysV goons for that, I think.)
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 15:58:47 -0600
From: Rich Grise <lovegod@earthling.net>
Subject: Re: newbie stuck on null return for 0 (zero) user input
Message-Id: <34D39E97.667D@earthling.net>
dev wrote:
>
> When a user enters data into my simple HTML form and only enters 0
> (zero) as input for a field, the resulting value in my perl script is
> null. This is wreaking havoc with me because 0 (zero) needs to be a
> valid response that I can evaluate, as well as null responses.
>
> Please tell me what could be causes this, or even direct me to a form
> processor that you know won't do this to me.
>
> Thanks,
>
> Dev
How are you parsing the form input? I've seen a lot of copies of what
I've come to think of as the 'standard' for form parsing, which reads
stdin, splits it on `&' into a list, or hash, or array, or something,
then splits each of these into either a hash or 2 arrays on `='. And
everything is strings. How are you getting YOUR input?
Rich, newbie-1.
------------------------------
Date: Sat, 31 Jan 1998 18:02:01 -0500
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: newbie stuck on null return for 0 (zero) user input
Message-Id: <fl_aggie-3101981802020001@aggie.coaps.fsu.edu>
In article <34D39E97.667D@earthling.net>, lovegod@earthling.net wrote:
+ How are you parsing the form input? I've seen a lot of copies of what
+ I've come to think of as the 'standard' for form parsing, which reads
+ stdin, splits it on `&' into a list, or hash, or array, or something,
+ then splits each of these into either a hash or 2 arrays on `='. And
+ everything is strings. How are you getting YOUR input?
Ummm...CGI.pm?? Don't re-invent the wheel, someone else has taken
care of the hard stuff already.
James
--
Consulting Minister for Consultants, DNRC
The Bill of Rights is paid in Responsibilities - Jean McGuire
To cure your perl CGI problems, please look at:
<url:http://www.perl.com/perl/faq/idiots-guide.html>
------------------------------
Date: Sat, 31 Jan 1998 23:43:49 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: OLE doesn't work
Message-Id: <6b0d33$euf$1@cyprus.atlantic.net>
According to "Michael Sazonov" <mike@inforis.ru>:
>When I try to run script excel1.pl in Perl/Eg, Perl
>writes the following:
>
>Can't call method "Add" without a package or object
>reference at excel1.pl line 24.
OLE doesn't work the same way in Perl as in other languages.
Sample code would help.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: 31 Jan 1998 23:37:11 GMT
From: Martin Schwartz <schwartz@cs.tu-berlin.de>
Subject: Re: Parsing Word Docs
Message-Id: <6b0cj7$5sf$1@news.cs.tu-berlin.de>
Paul Coogan <coogan@weptop.com> wrote:
> I have been able to extractt he text from Word Docs with the following
> bit of code: ...
> This only works on word 6/95. Has anyone been able to parse a word 97 doc?
Unfortunately the document file format of Word documents is that complicated,
that you cannot even be sure that your first version works. E.g. it will
fail for fastsaved documents, for documents with bigger texts, and for
documents that are internally too much segmented by what reason ever. Same
for Word 97. ... :-(
Because of these reasons you might have fun using OLE::Storage (or Laola)
instead, to be found at your CPAN site or at:
http://wwwwbs.cs.tu-berlin.de/~schwartz/pmh/
Regards,
Martin
--
// Le degre zero de l'ecriture? Zero probleme!
------------------------------
Date: Sat, 31 Jan 1998 17:34:36 -0500
From: jdf@pobox.com (Jonathan Feinberg)
Subject: Re: Please don't hit me!
Message-Id: <MPG.f3d7104e0e4f28b9896b1@news.concentric.net>
rory@hart.wattle.id.au said...
> I know this may be a stupid question, is there anyway to compile a perl
> program and make an executable?
*smack!*
FAQ.
--
Jonathan Feinberg jdf@pobox.com Sunny Brooklyn, NY
------------------------------
Date: 31 Jan 1998 21:54:20 GMT
From: gabor@vmunix.com (Gabor)
Subject: Re: send mail bug... ;(
Message-Id: <slrn6d774j.hph.gabor@vnode.vmunix.com>
In comp.lang.perl.misc, Alexander Kovalenko <luckycom@ica.net> wrote :
# hey for some reason when I am sending e-mail , it sends without any
# SUBJECT !!! whatz wrong with the following script :
#
# sub send_mail
# {
# local($addressee, $subject, $message) = @_;
# local($sendmail) = "/usr/sbin/sendmail";
#
# open(SENDMAIL, "| $sendmail -t");
#
# print SENDMAIL "To: ", $addressee, "\n\n";
# print SENDMAIL "Subject: ", $subject, "\n\n",
# print SENDMAIL $message;
#
# close(SENDMAIL);
# }
#
# $to="luckycom\@ica.net";
# $sub="Test of sending e-mail.. !";
# $body="test";
# &send_mail($to, $sub, $body);
#
# so any ideaz wqhat did i do wrong?
Several things, none of which have to do with Perl. ;-)
BTW, ideas is spelt with an 's'.
------------------------------
Date: 31 Jan 1998 22:43:01 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Survival Of perl
Message-Id: <6b09dl$506$1@csnews.cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, lovegod@earthling.net writes:
:the only computer I could find
:with web (or "net") access for less than $20,000.00 came with w95.
Linux is free.
--tom
--
Tom Christiansen tchrist@jhereg.perl.com
"Just because you're into control doesn't mean you're in control."
--Larry Wall
------------------------------
Date: Sat, 31 Jan 1998 19:22:37 -0500
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Survival Of perl
Message-Id: <pudge-3101981922370001@ppp-37.ts-1.kin.idt.net>
In article <34D37BE2.77B4@earthling.net>, lovegod@earthling.net wrote:
# Chris Nandor wrote:
# >
# [snip]
# > If someone is using perl only for the web, then he either has no use for
# > programming in general or, again, he is not keen enough to do anything
# > else. In either case, I would hardly call this the cutting edge.
# >
# [more snip]
# Well, as a relative newcomer to the world of perl, I'm glad I have
# enough
# experience in other programming-related stuff to not take personal
# offense
# at this remark. Yes, I'm a little off-topic here, and I'm really holding
Sigh. Please fix your linebreaks.
# my desire to flame in restraints here, but I've never had the benefit of
# working for an organization that presented me with a Unix system on
# which
# to learn programming. And as an "end-user", the only computer I could
# find
# with web (or "net") access for less than $20,000.00 came with w95. I
1. Buy a Mac. Hell, you can spend $10,000 on a tricked out G3 Mac with
tons of RAM and HD space that will run Linux, Windows and Solaris all in
emulation as fast as most Pentiums.
2. Install Linux.
3. Get shell access to a Unix box through an ISP.
# But "no use for programming"? Or, particularly egregious, "not keen
# enough
# to do anything else?"
#
# I don't think so, Chris.
Sorry, I should have realized that some people can use perl for other
things but, like you, choose not to. Why this is the case, I still cannot
fathom. I know "to each his own," but if you know enough to use Perl for
the Web, you should know enough to use it for other things, and I can't
see why you wouldn't. But that is your business, I suppose.
One more thing I should say is that if you only know enough Perl to do
"web stuff" and nothing else, then I fear for the safety of your web
server.
--
Chris Nandor mailto:pudge@pobox.com http://pudge.net/
%PGPKey=('B76E72AD',[1024,'0824 090B CE73 CA10 1FF7 7F13 8180 B6B6'])
#== New Book: MacPerl: Programming for the Rest of Us ==#
#== Publishing Date: Early 1998. http://www.ptf.com/macperl/ ==#
------------------------------
Date: Sat, 31 Jan 1998 23:19:40 GMT
From: jeff@yoak.com (Jeff Yoak)
Subject: Re: TYP21D (was: substitute...)
Message-Id: <6b0bc2$jcf@dfw-ixnews6.ix.netcom.com>
davet@angel.uunet.ca (Dave Till) wrote:
>Tom Grydeland writes:
>>The author completely fails to grasp the difference between the null string
>>"" and the undefined value.
[snip]
>In my experience, there aren't all that many cases in which the distinction
>between "" and the undefined value are important. Other users' mileage
>may vary. (If anyone out there knows of obvious pitfalls that beginning
>Perl programmers unaware of the distinction between "" and undefined
>risk falling into, please let me know.)
I haven't read your book so the comments that follow are strictly in
response to the information in this thread. The quoted portion seems
to say that you know that "" and the undefined value are different,
but that your book claims they are the same. Whether or not this is
likely to cause a problem to a beginning Perl programmer, it is still
a problem because of the way that many of us use books.
I started learning Perl from Learning Perl by Schwartz. After a
couple years I no longer need the introductory format of the book, but
if I need to look something up that I don't use often I'll still reach
for it first over the Camel or other resources because I've spent so
much time with it and know immediately where to find what I need.
I've never found reason to believe that I needed to look elsewhere
because accuracy was traded for didactic simplicity. In my opinion,
the Llama book is an excellent example of how to explain things so
that a beginner can understand them without stepping all over more
complicated things any more than necessary (and even then keeping it
in the footnotes :). It just isn't necessary to write books that will
kinda help until you reach a level of sophistication where you need
something accurate.
Cheers,
Jeff
-------------------------------
Jeff Yoak jeff@yoak.com
------------------------------
Date: Sun, 01 Feb 1998 00:10:33 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Using -w
Message-Id: <6b0el9$f68$1@cyprus.atlantic.net>
According to andrew.spiers@virgin.net:
>Everyone informs me that I should use '-w' on my scripts but when I do I
>get the following error :
Well, maybe you should use the "splain" tool and/or "use diagnostics"
to find out what those messages mean.
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: Sat, 31 Jan 1998 15:32:46 -0500
From: ppua@p3.net
Subject: vadduser and CGI
Message-Id: <34D38A6E.332259AA@p3.net>
I am having problems executing vadduser via a CGI script.
I used the system ( ) function but it doesn't seem to work. I can't
find any man pages for vadduser and thus do not know if it takes any
options.
vadduser when first executed from command line, asks for the username,
then asks for password, etc. until it is done. This is fine and works
from command line. But I want it to work via a CGI script.
Can anyone advise and help.
Thanks.
Terence Pua
------------------------------
Date: 31 Jan 1998 23:39:16 GMT
From: mwang@alhena.ibk.ml.com (Michael Wang)
Subject: why _open STDOUT, "> $fh"_ does not work?
Message-Id: <6b0cn4$3eu$1@news.ml.com>
This does NOT work:
#!/usr/local/bin/perl
use FileHandle;
$fh = new FileHandle "> file";
print $fh;
close STDOUT;
open STDOUT, "> $fh" or die "why? $!\n";
print "ok\n";
close STDOUT;
This works:
#!/usr/local/bin/perl
use strict;
open fh, "> file";
close STDOUT;
open STDOUT, ">& fh";
print "ok\n";
close STDOUT;
why? Thanks.
------------------------------
Date: Sat, 31 Jan 1998 23:58:16 GMT
From: chip@mail.atlantic.net (Chip Salzenberg)
Subject: Re: Win32: Any scripts to shut down all services?
Message-Id: <6b0du3$f3s$1@cyprus.atlantic.net>
According to Marc.Haber-usenet@gmx.de (Marc Haber):
>Did anyone write a script that shuts down all services on a Windows NT
>machine? Any hints will be appreciated.
<advocate>
Step 1. Reboot
Step 2. Install Linux
Free software that works better than the for-pay software.
Who'da thunk it?
</advocate>
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
Like Perl? Want to help out? The Perl Institute: www.perl.org
-> Ask me about Perl training and consulting <-
"It's the lemon zester of death!!" // MST3K
------------------------------
Date: 8 Mar 97 21:33:47 GMT (Last modified)
From: Perl-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 8 Mar 97)
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". 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 1779
**************************************
