[10986] in Perl-Users-Digest
Perl-Users Digest, Issue: 4586 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Jan 8 09:07:14 1999
Date: Fri, 8 Jan 99 06:00:15 -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: 4586
Today's topics:
Re: "internal server error" (Tony Greenwood)
Re: ActiveState seek/tell problem (Jeffrey R. Drumm)
Re: If Larry Wall's listening out there.... <tripp.lilley@perspex.com>
Matching binary strings <Tim.Shaw@alcatel.be>
Re: Need help using MakeMaker for scripts <dwc3q@mamba.cs.Virginia.EDU>
Re: Not Quite FAQ: perl for Win32 w/out console (Jeffrey R. Drumm)
Re: Perl uses in NT <martino@francomedia.qc.ca>
Re: Perl uses in NT (Gareth Jones)
Re: Wish to create a DBD module to interface with DBI. <fty@utk.edu>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 08 Jan 1999 21:12:59 GMT
From: paxton@cyberstrider.org (Tony Greenwood)
Subject: Re: "internal server error"
Message-Id: <369c4ba2.4200417@news.freeserve.co.uk>
** CyberSTrider Web Services http://web.cyberstrider.net **
Hey! abigail@fnx.com (Abigail)
>__ 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
Niether do I.. what do they do ?
>everything yourself instead of using modules written by people with a
Same here.. I still don't understand what a module is or how to use
them
>clue, you don't supply us with an error message, nor you clarify what
I get errors but no error messages, as I write in notepad then where
would I find error messages?
>"don't work" is, and you don't have the appropriate environment to test
>your work with.
I "think" I have the appropriate enviroment though so I am one up on
the original poster :)
>Please crawl under a rock and wither away. You make me sick.
Hmm not the best sig I ever came accross...
.
BTW it isn't sarcasm.. I really don't know the answers to the above..
.
Cheers.....!ynoT
CyberSTrider Web Services
http://web.cyberstrider.net
------------------------------
Date: Fri, 08 Jan 1999 13:51:24 GMT
From: drummj@mail.mmc.org (Jeffrey R. Drumm)
Subject: Re: ActiveState seek/tell problem
Message-Id: <36970d15.5686867@news.mmc.org>
[ posted to comp.lang.perl.misc and a courtesy copy was mailed to the cited
author ]
On 8 Jan 1999 05:41:41 GMT, Kurt George Gjerde <smkgg@hermes.svf.uib.no> wrote:
>I'm having problem with seek/tell in ActivePerl (winNT).
>The general problem is that a script like:
>
> $pos = tell $file;
> $line = <$file>;
> seek $file, $pos, 0;
see the documetation on binmode:
perldoc -f binmode
(snip)
--
Jeffrey R. Drumm, Systems Integration Specialist
Maine Medical Center - Medical Information Systems Group
drummj@mail.mmc.org
"Broken? Hell no! Uniquely implemented!" - me
------------------------------
Date: Fri, 08 Jan 1999 08:48:03 -0500
From: Tripp Lilley <tripp.lilley@perspex.com>
Subject: Re: If Larry Wall's listening out there....
Message-Id: <36960C93.E9FCCEFB@perspex.com>
Daniel Grisinger wrote:
> Sounds like you need to institute new `quality-of-penmanship' standards
> to guarantee proper code generation. For just $5000/hour I can come in
> and provide you with a complete set of guidelines and a reproducible
> process guaranteed to inprove anybody's perl penmanship. You'll find
> that your network runs better, you'll sleep better at night, world peace
> will be achieved, and you'll be free from the heartbreak of psoriasis.*
Okay, I'm game! But I can only pay you in rubber ningies. Possibly pennies. I
might be able to do pennies. But you'll have to give me a little discount
because it's hard for me to get anyone to trade pennies for my rubber ningies.
BTW: While you're at it, I'd like you to do a feasibility study on migrating
our shop from IP over Carrier Pigeon to something a little more modern. I've
heard good things about this new IP over Morse Code...
------------------------------
Date: Fri, 08 Jan 1999 14:05:46 +0100
From: Tim Shaw <Tim.Shaw@alcatel.be>
Subject: Matching binary strings
Message-Id: <369602AA.C07EFB4A@alcatel.be>
In the following example, the strings are not in fact binary, but they
would be at another level of interpolation (if that's the correct
expression). Any idea why they do not match?
#!/usr/bin/perl -w
use strict;
use diagnostics;
my $value = "\\x01\\x02";
my $mask = "\\x01\\x02";
print "value = $value\n";
print "mask = $mask\n";
if ($value =~ m/$mask/)
{
print "Match\n";
}
else
{
print "No match\n";
}
I'm using perl 5.004.
Tim
------------------------------
Date: Fri, 8 Jan 1999 08:48:40 -0500
From: David Coppit <dwc3q@mamba.cs.Virginia.EDU>
To: Randy Kobes <randy@theory.uwinnipeg.ca>
Subject: Re: Need help using MakeMaker for scripts
Message-Id: <Pine.GSO.4.05.9901080844200.14181-100000@mamba.cs.Virginia.EDU>
On Fri, 8 Jan 1999, Randy Kobes wrote:
> On Thu, 7 Jan 1999 11:00:10 -0500, David Coppit <dwc3q@cs.virginia.edu> wrote:
> >
> >- How do I get the permissions to be 755 -- in particular, the main script
> > and configuration file?
>
> I believe the permissions will be correctly set when the user
> invokes 'make install'.
Nope. When I try to edit the installed config file, it is marked as
read-only.
> >- Is there a way to get MakeMaker to take the version information from
> > the id line? (Some modules don't set VERSION, and use something like
> > the following instead.)
> > # $Id: Parse.pm,v 2.3 1996/06/09 14:49:59 aas Exp $
>
> I believe for a number of reasons that the setting of a $VERSION in
> the modules is encouraged. The PAUSE software, for one, uses it
> if it's there, I think. MakeMaker will parse a file determined
> by VERSION_FROM for this value, the actual regular expression used
> being given in the MakeMaker docs.
You answered a different question, I think. :) The problem is that I'm
using third-party modules that *don't* set $VERSION, so things like
VERSION_FROM don't work in MakeMaker.
I want to convince MakeMaker to try the version control line when $VERSION
is not set. I guess I'll have to patch MakeMaker, or code it up myself in
Makefile.PL
> >- Make uninstall doesn't seem to work, and is pretty unnecessary here.
> > How do I suppress the creation of the .packlist file?
>
> I think make uninstall is no longer supported.
Okay. Is there a way to suppress the creation of the .packlist file?
Regards,
David
_________________________________________________________________________
David Coppit - Graduate Student coppit@cs.virginia.edu
The University of Virginia http://www.cs.virginia.edu/~dwc3q
"For I am a Bear of Very Little Brain,
and long words Bother me" - Winnie the Pooh
------------------------------
Date: Fri, 08 Jan 1999 13:36:06 GMT
From: drummj@mail.mmc.org (Jeffrey R. Drumm)
Subject: Re: Not Quite FAQ: perl for Win32 w/out console
Message-Id: <3696055b.3709283@news.mmc.org>
[ posted to comp.lang.perl.misc and a courtesy copy was mailed to the cited
author ]
On Fri, 08 Jan 1999 01:41:38 GMT, drummj@mail.mmc.org (Jeffrey Drumm) wrote:
(snip)
>If you're talking about NT, have you looked at the parameters for the START
>command? I'm not at my NT system at the moment, but I believe you can run a
>console app in a hidden window. At the very least you can run it minimized
^^^^^^^^^^^^^^^^^^
Make that "without creating a new window."
(snip)
I'm on NT now, and have verified that there's a /B switch that, according to
the online help, will:
"Start application without creating a new window. The application has ^C
handling ignored. Unless the application enables ^C processing, ^Break is the
only way to interrupt the application"
START /B \path\to\script
If you need the job to wait until your Perl program finishes, add the /WAIT
flag to START.
>START /path/to/script /MIN
Oops, got my backwhacks *and* arguments backwards. Should have been:
START /MIN \path\to\script
(snip)
--
Jeffrey R. Drumm, Systems Integration Specialist
Maine Medical Center - Medical Information Systems Group
drummj@mail.mmc.org
"Broken? Hell no! Uniquely implemented!" - me
------------------------------
Date: Fri, 08 Jan 1999 13:02:44 GMT
From: Alain Martineau <martino@francomedia.qc.ca>
Subject: Re: Perl uses in NT
Message-Id: <369601F3.6AF1606D@francomedia.qc.ca>
I think he's asking why he should read it. How Perl would help his NT
administration tasks. I wonder.
I use Perl for CGIs on an NT web server, but could I use it for system
administration as I can on Unix ? The Unix world is all administrable
via the command line or open APIs. NT is all done through a maze of GUI
screens without a command line equivalent. And I keep hearing that not
all APIs required to administer are published by Microsoft. Can you for
instance write a program to create/modify/delete users using public
information ?
Les wrote
> Zenin wrote:
>
> > Isn't there a book, "Learning Perl on Win32 Systems"?
>
> Very good book. (As are all of Oreilly's that I've used.)
>
> http://www.oreilly.com/catalog/lperlwin/
>
> Les Driggers
------------------------------
Date: Fri, 08 Jan 1999 13:50:11 GMT
From: gareth@ibis.demon.co.uk (Gareth Jones)
Subject: Re: Perl uses in NT
Message-Id: <369b0281.48695750@news.demon.co.uk>
Alain Martineau <martino@francomedia.qc.ca> wrote:
>I think he's asking why he should read it. How Perl would help his NT
>administration tasks. I wonder.
>
>I use Perl for CGIs on an NT web server, but could I use it for system
>administration as I can on Unix ? The Unix world is all administrable
>via the command line or open APIs. NT is all done through a maze of GUI
>screens without a command line equivalent. And I keep hearing that not
>all APIs required to administer are published by Microsoft. Can you for
>instance write a program to create/modify/delete users using public
>information ?
The published APIs are pretty comprehensive. To add users in perl you
can use the Win32::NetAdmin module, which uses pretty standard API
calls to do the work.
Gareth
------------------------------
Date: Fri, 08 Jan 1999 07:53:44 -0500
From: Jay Flaherty <fty@utk.edu>
Subject: Re: Wish to create a DBD module to interface with DBI. Where to start?
Message-Id: <3695FFD8.CFF0402@utk.edu>
Chad Lavy wrote:
> Does anyone have experience with creating DBD modules that can
> interface with DBI? I would like to create a DBD::Teradata module and
> really don't know exactly where to begin.
I would grap some of the other DBD modules and see how they did it. This
should give you a good idea of where to start.
jay
------------------------------
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 4586
**************************************
