[10982] in Perl-Users-Digest
Perl-Users Digest, Issue: 4582 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jan 8 05:00:56 1999
Date: Fri, 8 Jan 99 02:00:14 -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 Fri, 8 Jan 1999 Volume: 8 Number: 4582
Today's topics:
Re: "internal server error" (Abigail)
Re: Active Perl / NT: XCopy don't work <Thomas.Stieglitz@Zeppelin.DE>
Deleting List Elements - Thanks! <rj@suse.de>
Re: fork under Win32 -- Activestate!? (Bart Lateur)
Re: NT/ActivePerl/File::Copy/Network Drive/AT command = <m.doxsey@x400.icl.co.uk>
Re: Perl Criticism (Bart Lateur)
Problem with Perl Compiler Kit, Version alpha3 <razorcut@ogl.org>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 8 Jan 1999 09:58:58 GMT
From: abigail@fnx.com (Abigail)
Subject: Re: "internal server error"
Message-Id: <774kt2$iu7$1@client3.news.psi.net>
Eirik Johansen (webpages@email.com) wrote on MCMLV September MCMXCIII in
<URL:news:36950532.AF3E1068@email.com>:
__
__ I've just started learning Perl and I recently modified a CGI-skripy,
__ but now it won't work and I don't know why. Would someone be as kind as
__ to rund it un their Unix shell (I don't have Unix) and tell me which
__ line makes the error.
Let's see.... you don't have -w, you don't have "use strict", you do
everything yourself instead of using modules written by people with a
clue, you don't supply us with an error message, nor you clarify what
"don't work" is, and you don't have the appropriate environment to test
your work with.
You also expect the group to run and debug your work.
Please crawl under a rock and wither away. You make me sick.
Abigail
------------------------------
Date: Fri, 08 Jan 1999 10:18:41 +0100
From: Thomas Stieglitz <Thomas.Stieglitz@Zeppelin.DE>
To: Steve Beisner <beisner@acm.org>
Subject: Re: Active Perl / NT: XCopy don't work
Message-Id: <3695CD71.AFC42D4@Zeppelin.DE>
Thanks for your hing. The `XCOPY form to` was only a little example. The
(my? ;-) ) XCOPY works in neither way: "xcopy c:\\test\\*.* c:\\test2\\*.*"
It seems to be a problem with XCopy: I get no errormessages in "$!" or "$?"
and the program does simply nothing. Does xcopy work in an other way
("nearer to the system") as an notepad or a "dir" does?
Tom
Steve Beisner wrote:
> Well, to start with you need the "/s" switch on the xcopy
> command line if you want to copy subdirectories.
>
> Thomas Stieglitz wrote:
> >
> > Hello all!
> >
> > I try to copy a whole directory tree via the NT/DOS (?) Command XCopy,
> > but it doesn't work.
> >
> > I've tried the following:
> > $mycommand = 'xcopy from to';
> > $message = `XCOPY $mycommand`;
> > or
> > system ($mycommand)
> >
> > The result is, that nothing happens: Neither $! nor $? are giving any
> > results, there are no files copied and there is no message, neither on
> > the output screen nor in $message.
> >
> > If I try other commands as "notepad" as example for an NT Programm or
> > "blat" as example for an DOS-program, everything runs well.
> >
> > Who knows a solution or an other solution for copying whole directory
> > trees?
> >
> > Thanks all, Tom
>
> --
> Steve Beisner
>
> California: 805-967-5973 265 Nogal Dr, Santa Barbara CA 93110
> Louisiana: 225-638-7359 Box 374, 504 E. Main St, New Roads LA 70760
> Email: beisner@acm.org Web: http://www.inkpad.com/steve
> Anytime personal phone if I'm available, else vmail: 805-895-5326
------------------------------
Date: Fri, 08 Jan 1999 09:38:52 +0100
From: Richard Jelinek <rj@suse.de>
Subject: Deleting List Elements - Thanks!
Message-Id: <3695C41C.F80B3BE1@suse.de>
Uri Guttman wrote:
> >>>>> "RJ" == Richard Jelinek <rj@suse.de> writes:
>
> RJ> either there are tomatoes on my eyes or I'm still a bloody perl-newbie:
>
> or both? :-)
>
> RJ> @list = (1,2,3,4,5);
>
> RJ> How do I delete element 3? I mean not to clear it, I mean delete. I know
> RJ> shift,pop et al. but I need to delete elements inside a list.
>
> perldoc -f splice
Thank you all who took your time to answer even this trivial question.
Believe it or not, it took me nearly half a day until I gave up and asked here.
I have the Programming Perl, Advanced Perl programming, Perl ressource kit , Perl
reference and of course all the online help for acquiring information.
I didn't read all the functions alphabeticaly. Instead I tried to find it in the
Index:
List
- deleting elements (no)
delete() (no)
Examples in the List section of perl programming (no)
Functions listed in categories Lists -> grep,join,map,qw//, reverse,sort,unpack
(no)
CPAN-Search (no)
[...] (no)
Yes: Arrays -> ... splice ...
Well next time then. :-)
Bye
Rico
------------------------------
Date: Fri, 08 Jan 1999 09:04:44 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: fork under Win32 -- Activestate!?
Message-Id: <3697c4c4.4581898@news.skynet.be>
Richard Bateman wrote:
> I seem to have run into a brick wall as far
>as spawning child processes to process the requests. I figured out how
>to have a program wait on a port, in this case port 110, but only one
>person can connect to it at a time. Does anybody know a way to work
>around the missing "fork" function in WindowsNT?
I never understood how it's possible for several programs to share the
same port, and yet, each client finding it's way back to the copy of the
program it originally connected to. But anyway.
Isn't it possible to asynchroniously launch another script, that takes
care of one connection? It's definitely possible in Windows to have
multiple copies of one program running at the same time, if the program
allows it.
It looks like system and `...` do work synchroniously. Using
system("start script.pl") MAY help. (I've never used "start" in my
life).
HTH,
Bart.
------------------------------
Date: Fri, 8 Jan 1999 09:00:53 -0000
From: "Martin Doxsey" <m.doxsey@x400.icl.co.uk>
Subject: Re: NT/ActivePerl/File::Copy/Network Drive/AT command = unsuccessful
Message-Id: <3695c836.0@145.227.194.253>
The other alternative is to set the network share you are accessing as a
null share - it involves a registry edit of
HKLM\SYSTEM\CurrentControlSet\Services\LanmanServer\Parameters\NullSessionSh
ares. The obvious drawback is that this exposes that share to access by
potentially anybody.
HTH
Martin Doxsey
------------------------------
Date: Fri, 08 Jan 1999 09:04:42 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Perl Criticism
Message-Id: <3695bf06.3112160@news.skynet.be>
topmind@technologist.com wrote:
>The motivation of the list is to get a decent programming language
>that does not have the syntactic abusability of Perl.
>My intention is to make a better world, not start flame wars.
You sound like a "Python" kind of person. Try it out. Most Perl people
have done that at one time or another.
Let the Perl people have their syntactic abusabilty. It is by design.
Really. Most seem to like it that way.
Bart.
------------------------------
Date: Thu, 07 Jan 1999 09:39:18 -0500
From: Ray Graham <razorcut@ogl.org>
Subject: Problem with Perl Compiler Kit, Version alpha3
Message-Id: <3694C715.3151@ogl.org>
Environment : Red Hat 5.2, Perl 5.004_04
Successful install of the compiler kit. As a test, I created a "hello
world" (test.pl) program that looks just like this :
#!/usr/bin/perl
print "\nHello World!\n\n";
exit(0);
I then, as instructed in the README distibuted with the kit, type
perl -MO=C,-otest.c test.pl
and also tried
perl -MO=CC,-otest.c test.pl
but I get the following output :
test.pl syntax
OK
Undefined subroutine &main:: called at (eval 2) line
1.
END failed--cleanup aborted.
Any guesses as to what this could be? Such a simple program should
work. :) I'm guessing that it's not a problem with test.pl since I get
the same message with any perl program I attempt to analyze.
--
Ray Graham
Online Gaming League
Co-President/Programmer
http://www.ogl.org
------------------------------
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 4582
**************************************
