[11797] in Perl-Users-Digest
Perl-Users Digest, Issue: 5397 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Apr 16 06:07:20 1999
Date: Fri, 16 Apr 99 03:00:18 -0700
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, 16 Apr 1999 Volume: 8 Number: 5397
Today's topics:
Re: accessing files across UNC paths <c4jgurney@my-dejanews.com>
Re: can Perl handle huge files <Philip.Newton@datenrevision.de>
Changing one variable and rewriting a file with the new <supton@soonet.ca>
Re: Changing one variable and rewriting a file with the (Sam Holden)
Re: checking filenames.. <Philip.Newton@datenrevision.de>
Re: Core <gellyfish@gellyfish.com>
How can I attach spaces before a text field or text are baskar1981@my-dejanews.com
Re: How can I attach spaces before a text field or text <eyounes@aol.com>
Re: how can i send perl -c output to a file instead of <kai@sparc.spb.su>
Re: How do I format form input to DOS text (sort of) ?? (Kvan)
Module/Script for a WWW-Portal? <manuel.elgorriaga@sbszh.ch>
Re: Newbie needs help with pattern search and concatena (Bart Lateur)
Open an THML file but don't display it <mpajot@club-internet.fr>
Re: PerlIS and system command: please help me <c4jgurney@my-dejanews.com>
Re: preserving blank spaces (Larry Rosler)
Re: preserving blank spaces <Philip.Newton@datenrevision.de>
Re: preserving blank spaces (Bart Lateur)
Re: Recursion not working properly <gellyfish@gellyfish.com>
Re: Recursion not working properly (Bart Lateur)
Re: Scalar length and general Perl questions <aidan@salvador.blackstar.co.uk>
Re: TZ not used in winnt Date/Time routines <gellyfish@gellyfish.com>
Re: Unable to run perl <c4jgurney@my-dejanews.com>
Re: warnings on Win32 <gellyfish@gellyfish.com>
Re: warnings on Win32 (David Cantrell)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Fri, 16 Apr 1999 08:37:58 GMT
From: Jeremy Gurney <c4jgurney@my-dejanews.com>
Subject: Re: accessing files across UNC paths
Message-Id: <7f6st6$a5j$1@nnrp1.dejanews.com>
In article <37165c74@discussions>,
"erk" <ericw@fikus.com> wrote:
>
> I am attempting to write a script which
> reads and writes files across UNC paths
> (ie: \\GEORGE\C$\WINNT\....).
> It works when run command line, but fails
> to access them when run from the 'Net. Does
> anyone know how I can either:
>
> a) get MS-IIS 4.0 to allow the scripts to read
> and write across UNC's , or
>
> b) execute a process with username-password
> (syntax needed!)
>
> c) get mapped "Logical drive letters"
> from UNC paths
>
> Any help would be appreciated, and please
> e-mail me if you have a solution.
> Thanx :)
> e
It will probable be failing not due to the unc path itself but due to the
access permissions granted to IIS. If you're runing IIS as a service under
the localsystem account then it only has network access as 'guest'.
You could try the following as a work around;
net use q: \\GEORGE\C$\WINNT\....
will map the q: drive as the path you requested
net use q: \\GEORGE\C$\WINNT\.... /user:YOURDOMAIN\fredfintstone bedrock
will map the q: drive with the permissions of fredfintstone where bedrock is
his password
(when you've finished don't forget to net use q: /delete)
Of course the latter is a gaping security hole as it involves having a
password hard coded somewhere.
Generally in perl I've found it is much more preferable to use unc's than
drive letters for various reasons.
Jeremy Gurney
SAS Programmer | Proteus Molecular Design Ltd.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Fri, 16 Apr 1999 09:28:24 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: can Perl handle huge files
Message-Id: <3716E698.82A8843A@datenrevision.de>
Tom Christiansen wrote:
>
> [courtesy cc of this posting sent to cited author via email]
>
> In comp.lang.perl.misc, martin@cutup.de writes:
> :I'm thinking of using Perl for the job but am a little wary of the:
> :open(FILE,$file);
> :@lines = <FILE>;
> :close(FILE);
>
> That's not the standard pattern for linewise streamfile processing --
> and for good reason. I suppose that you could, if you tried really
> hard, probably devise a worse way to process a file a line at a time
> than you've shown us here, but you'd certainly have to work at it.
How about undef'ing $/, slurping the file into a big string and diddling
around with index($contents, "\n", $lastpos)? Would that be worse?
(Splitting $contents on /\n/ would be too easy, and too similar to the
original suggestion.)
Cheers,
Philip
------------------------------
Date: Fri, 16 Apr 1999 03:47:27 -0400
From: "Hiccup" <supton@soonet.ca>
Subject: Changing one variable and rewriting a file with the new variable
Message-Id: <7f6pvt$m9f$1@east42.supernews.com>
Here's what i'd like to do, open my file called Info, which contains various
things in this format,
Billy-bob|april 16/99|1000
Janet|jan 23/99|1234
Quito|feb 3/99|2000
Now, I want to add 10 to Billy-bob's score and rewrite the file...having it
appear just like that only 1000 is now 1010.
Here is what I have so far and it does work, but it rewrites the file with a
bunch of spaces before the name...
So the new Info file looks like this:
Billy-bob|april 16/99|1010
Janet|jan 23/99|1234
Quito|feb 3/99|2000
Here's the code for it....
open(INFO, "Info");
@LINES=<INFO>;
close(INFO);
$SIZE=@LINES;
for ($i=0;$i<=$SIZE;$i++) {
$_=$LINES[$i];
if ($_ =
me){
$score=$score+10;
$winner="$name|$date|$score\n";
last;
}
}
close(INFO);
open(INFO, "Info");
@NEW=<INFO>;
close(INFO);
for ($a=0;$a<=$SIZE;$a++) {
$_=$NEW[$a];
if ($_ =~ $name){
splice(@LINES, $a, 1);
splice(@LINES, $a, 0, $winner);
last;
}
}
open (INFO,">Info");
print INFO "@LINES";
close(INFO);
Is there any easier way to do this? And does anyone know why the spaces are being put in when it's rewritten?
Any suggestions are greatly appreciated.
*Hic*
------------------------------
Date: 16 Apr 1999 08:11:13 GMT
From: sholden@pgrad.cs.usyd.edu.au (Sam Holden)
Subject: Re: Changing one variable and rewriting a file with the new variable
Message-Id: <slrn7hds51.44i.sholden@pgrad.cs.usyd.edu.au>
On Fri, 16 Apr 1999 03:47:27 -0400, Hiccup <supton@soonet.ca> wrote:
>Here's what i'd like to do, open my file called Info, which contains various
>things in this format,
>
>Billy-bob|april 16/99|1000
>Janet|jan 23/99|1234
>Quito|feb 3/99|2000
>
>Now, I want to add 10 to Billy-bob's score and rewrite the file...having it
>appear just like that only 1000 is now 1010.
>
>Here is what I have so far and it does work, but it rewrites the file with a
>bunch of spaces before the name...
>
>So the new Info file looks like this:
>
>Billy-bob|april 16/99|1010
> Janet|jan 23/99|1234
> Quito|feb 3/99|2000
>
>Here's the code for it....
>
>open(INFO, "Info");
What if the open fails... open(...) || die "... $!";
>@LINES=<INFO>;
>close(INFO);
>$SIZE=@LINES;
>
>for ($i=0;$i<=$SIZE;$i++) {
Perl does have a foreach loop you know...
> $_=$LINES[$i];
Why do that when you don't use $_ as a default value anywhere...
> if ($_ =
>me){
Do you really want to assign 'me' to $_.
The me should be in quotes or have a $ at the front...
> $score=$score+10;
+= is a neater...
> $winner="$name|$date|$score\n";
> last;
> }
>}
>close(INFO);
>
>open(INFO, "Info");
>@NEW=<INFO>;
>close(INFO);
Why reread the whole file... why not just make a copy of @LINES...
in fact why not use '$LINES[$i] = "$name|$date|$score\n";' above and
skip the whole step...
>
>for ($a=0;$a<=$SIZE;$a++) {
> $_=$NEW[$a];
> if ($_ =~ $name){
> splice(@LINES, $a, 1);
> splice(@LINES, $a, 0, $winner);
Anything wrong with $LINES[$a] = $winner...
> last;
> }
>}
>
>open (INFO,">Info");
> print INFO "@LINES";
Lose the quotes and the extra spaces will go away...
Read the documentation to see why...
>close(INFO);
You really need to enable warnings (perl -w) since that will tell you most of
the problems...
>
>Is there any easier way to do this? And does anyone know why the spaces are being put in when it's rewritten?
You could try reading some of the perl documentation. Especially perlsyn,
since it will be much easier to write using the part of perl that doesn't
look like C...
You could try something like :
perl -pi -aF\\\| -e '$_ = "$F[0]|$F[1]|".($F[2]+10)."\n"
if $F[0] eq "Billy-bob"' Info
But there are lots of others ways which I'm sure other people will point out
to you...
--
Sam
There's no such thing as a simple cache bug.
--Rob Pike
------------------------------
Date: Fri, 16 Apr 1999 09:31:46 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: checking filenames..
Message-Id: <3716E762.C1C5F5C@datenrevision.de>
Tad McClellan wrote:
>
> Usenet is unreliable.
>
> It may be a day before you get an answer.
>
> You may never get an answer...
You may get a wrong answer, or an incomplete one. The fix to this answer
may appear much later, or not at all. Meanwhile, you may already have
implemented the incorrect answer.
You may get five answers, all telling you different things. (Possibly
some wrong, some incomplete, and some TMTOWTDI -- of which some will be
fast and some slow. Or any other combination.)
Usenet can be very helpful, but it is not without its limitations.
Cheers,
Philip
------------------------------
Date: 16 Apr 1999 09:42:05 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Core
Message-Id: <3716f7dd@newsread3.dircon.co.uk>
Chris Lambrou <cglcomputer@earthlink.net> wrote:
> One of our PERL scripts on our Web Server dumps the core, peridically.
> 1. When will PERL dump a core file? And under what circumstances?
Although it *can* dump core on occassion - I had a build on Solaris for
instance that would coredump at the slightest provocation - I would take
a bet on the chance that its not actually Perl but some external program
that Perl is running that is doing it.
> 2. How can we identify the offending script?
>
Some versions of 'file' will tell the program that made the corefile -
alternatively you might be able to run a debugger on it to get it to
reveal its secrets.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 16 Apr 1999 09:32:08 GMT
From: baskar1981@my-dejanews.com
Subject: How can I attach spaces before a text field or text area
Message-Id: <7f702o$cqi$1@nnrp1.dejanews.com>
When using cgi script I could not allign the text field or text area boxes
according to my wish.
for e.g. if I want text fields after "Please enter your name" and "Please
enter the message you want to display" and I want both the text fields to
start from the same point how do I do it.
I could not find any possible solution for this problem like attaching a set
of spaces after "Please enter your name" so as to bring it to the other
strings. But this is not a good way and no doubt it did not work.
I also want to know how to avoid scroll bars in a text area box.
Regards
Baskar
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Fri, 16 Apr 1999 11:51:29 +0200
From: "Ysteric's" <eyounes@aol.com>
Subject: Re: How can I attach spaces before a text field or text area
Message-Id: <7f70s0$4t9@news.vtcom.fr>
if you want a space to be display, use
Eric - from France
------------------------------
Date: Fri, 16 Apr 1999 11:35:30 +0400
From: "Arzhan I. Kinzhalin" <kai@sparc.spb.su>
Subject: Re: how can i send perl -c output to a file instead of STDERR
Message-Id: <Pine.GSO.4.02.9904161132320.11267-100000@minerva.sparc.spb.su>
yep, I guess the one named Manida would like to read thin books especially on
perl. But books he read has one compulsory requirement: every one have to
contain picture of lamma... This is the way he looks in the mirror.
:)
xcore
On Thu, 15 Apr 1999, Bart Lateur wrote:
->Manida Ivan wrote:
->
->>Abigail, that's a great one :)
->>Did you ever thought about publishing a Perl tips book? I'd buy it :)
->
->It would be a very thin book. Many lines would look like:
->
-> FAQ
->
-> :-)
->
-> Bart.
->
->
------------------------------
Date: Fri, 16 Apr 1999 08:29:26 GMT
From: kvan@dis.dk (Kvan)
Subject: Re: How do I format form input to DOS text (sort of) ???
Message-Id: <3716f485.3899867@news.newsguy.com>
On Thu, 15 Apr 1999 07:32:58 -0700, lr@hpl.hp.com (Larry Rosler)
wrote:
>Try using =~ instead of = .
Thanks for catching my typo, Larry. I sure wish I was back on a *nix
box where cutting and pasting would be a breeze. Sigh.
Kvan, PoB.
-------Casper Kvan Clausen------ | 'A *person* is smart. People are
---------<kvan@dis.dk>---------- | dumb, panicky, dangerous animals
| and you know it.'
| - "K" in Men in Black.
------------------------------
Date: Fri, 16 Apr 1999 10:32:14 +0200
From: Manuel Elgorriaga <manuel.elgorriaga@sbszh.ch>
Subject: Module/Script for a WWW-Portal?
Message-Id: <3716F58E.EB6DB3ED@sbszh.ch>
Hi all,
I'm wondering if anyone has implemented a Web-portal using Apache, Perl
and some SQL-DB (e.g. MySQL). I don't like them in the Internet, but I
think they could be quite useful in an enterprise-intranet environment.
Possibly there will be no specific software for it yet, because it's a
quite straightforward application, but I would like to avoid pitfalls in
design and implementation, and the it should be easily expandable.
Some basic steps I could imagine are:
- intranet main index page with a 1x1 gif that starts the portal script
- user identification through login and/or cookie
- generation of personalized portal page based on information of basic
services ("you've got mail" with headers), enterprise or department
news, standard link-list to enterprise information and resources, and
personalized preferences (database driven).
Well, I would greatly appreciate some comments, hints, or pointing to
already solutions for a little intranet (about 60 users). Many thanx in
advance,
Manuel Elgorriaga Kunze
Swiss Library for the Blind
------------------------------
Date: Fri, 16 Apr 1999 09:46:40 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Newbie needs help with pattern search and concatenation snippet
Message-Id: <37190669.1236746@news.skynet.be>
greg wrote:
>I now need to traverse each line, see if it has a string in it that was
>specified by the user.
>If it does, I then need to check to see if the line ends with a
>semicolon. If it does, I want to leave the line intact and go on to the
>next line.
>If it doesn't, I need to join it with the following line.
>I then want to check this new line (which has been formed
>by the concatenation of the two) and if it still doesn't end with a
>semicolon, then join it with the next line again....etc..etc..until it
>finally ends with a semicolon.
Time to get an obscure Perl operator out of the closet: ".." in scalar
context. This one has a built-in state: it is switched on by the left
side term, and turned off by the the right hand term.
So far, I had never used this operator before. I had only seen Abigail
use it in a newsgroup post. So I'm actually learning something myself by
spending time here, even by answering a question myself! Take *that* to
your boss... :-) (I am of course referring to a recent post: "Don't you
have to work?".)
Unfortunetaly, this operator has an annoying feature: it switches off
one line to late. So I've had to use an extra (localized) variable which
detects if the right hand term is true, and nothing happens in that case
(last line only).
Here's the working version (note: the script stops at the line "Done."):
#! perl -w
while(<DATA>) {
if(/foo/ .. (my $off=/;\s*$/)) {
s/\n?$/ / unless $off;
}
print;
}
__DATA__
This is nothing
Neither is this
But here's a foo!
So we continue...
until we get here;
And back to normal.
This is a single line foo;
Done.
Result:
This is nothing
Neither is this
But here's a foo! So we continue... until we get here;
And back to normal.
This is a single line foo;
Done.
Looks ok, huh? Even a single line with both conditions true (/foo/ and
/;$/) is processed correctly.
Note: try it without the $off variable:
if(/foo/ .. /;\s*$/) {
s/\n?$/ /;
}
This gives:
This is nothing
Neither is this
But here's a foo! So we continue... until we get here; And back to
normal.
This is a single line foo; Done.
Bart.
------------------------------
Date: Fri, 16 Apr 1999 11:11:18 +0200
From: "Kevin" <mpajot@club-internet.fr>
Subject: Open an THML file but don't display it
Message-Id: <7f6up1$jke$1@front2.grolier.fr>
Hi all,
I would like to write a perl script which opens an URL but doesn't send it
to the browser. It's just to analyze the contain of this file.
I suppose there is just a function that makes the job...
Can you help me please ?
Thank you in advance
Regards
Kevin
------------------------------
Date: Fri, 16 Apr 1999 08:44:59 GMT
From: Jeremy Gurney <c4jgurney@my-dejanews.com>
Subject: Re: PerlIS and system command: please help me
Message-Id: <7f6taa$ah2$1@nnrp1.dejanews.com>
In article <7f4ll7$d6q$1@nslave1.tin.it>,
"Andrea Borgogelli Avveduti" <borgo@indi.it> wrote:
> Hi Expert
> I use Perl for win32 and PerlIS on a NT server.
> This is one of my CGI:
> $inputfile = "N:\\filename.doc";
> $outputfile = "C:\\dir\\subdir\\filename2.doc";
> system "copy \"$inputfile\" \"$outputfile\"";
> where N is a network drive.
> My CGI doesn't work with PerlIS but works if i execute it with the Perl
> command.
> Why ? How can I do it working ?
> If I change the network drive N: with the local drive C: all work fine.
> Thank you.
>
> Andrea (borgo@indi.it)
>
> Please write me back at this address: borgo@indi.it
>
Try changing the n: to the full unc path, if that doesn't work see the thread
'accessing files across UNC paths';
Jeremy Gurney
SAS Programmer | Proteus Molecular Design Ltd.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Thu, 15 Apr 1999 23:41:20 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: preserving blank spaces
Message-Id: <MPG.11807b5ba2d288259898c3@nntp.hpl.hp.com>
[Posted and a courtesy copy sent.]
In article <fNzR2.89$C76.56@c01read02.service.talkway.com> on Fri, 16
Apr 1999 05:21:15 GMT, Rob Bell <bluesrift@aol.com> says...
> Within an html form textarea tag one may enter multiple spaces to
> seperate words or whatever. I am pulling the content of this textarea
> and printing it into a new html page and would like to preserve those
> spaces which are normally collapsed by browsers when rendering html. I
> know this must involve the usage of yet a simple substitution of
> for a blank space does not seen to work such as below:
>
> $form{'THETEXTAREA'} =~ s/ /\ \;/g;
What make you think this doesn't work? It is valid Perl, and would work
even without those superstitious backslashes.
> Please suggest any other method I could use.
You might enclose the text between <PRE> and </PRE> tags, which force
browsers to respect the spaces. But you might not like the typewriter
font that results by default.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Fri, 16 Apr 1999 09:37:37 +0200
From: Philip Newton <Philip.Newton@datenrevision.de>
Subject: Re: preserving blank spaces
Message-Id: <3716E8C1.FBA48863@datenrevision.de>
Rob Bell wrote:
>
> Please suggest any other method I could use.
<PRE> ... </PRE>
Cheers,
Philip
------------------------------
Date: Fri, 16 Apr 1999 08:52:30 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: preserving blank spaces
Message-Id: <3717f9a6.7769745@news.skynet.be>
Rob Bell wrote:
>Within an html form textarea tag one may enter multiple spaces to
>seperate words or whatever. I am pulling the content of this textarea
>and printing it into a new html page and would like to preserve those
>spaces which are normally collapsed by browsers when rendering html. I
>know this must involve the usage of yet a simple substitution of
> for a blank space does not seen to work such as below:
>
>$form{'THETEXTAREA'} =~ s/ /\ \;/g;
It looks like this would do what you want. But are you sure it isn't the
line rewrapping that plays tricks on you?
Oh BTW, you might want to replace any of [&<>] by there entities, in
order to prevent HTML formatting by the user. If he does it wrong, you'd
end up with invalid html...
Bart.
------------------------------
Date: 16 Apr 1999 09:23:36 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Recursion not working properly
Message-Id: <3716f388@newsread3.dircon.co.uk>
Mike Rizzo <mrizzo@ismd.ups.com> wrote:
> I have a perl script in wihch a recursive call that I am attempting is not
> executing properly. The sub is called coparedirs(), when I call comparedirs
> from inside
> comparedirs, it does start exectuing compare dirs, but it seems as if the
> original
> call to comparedirs never completes running. Is there something I am missing
> about recursion in Perl that I should know about before attempting this
> execution.
>
Doris is of the opinion that you might be trying to keep your directory
handles open over your recursive subroutine calls and are getting bitten
by the fact that the handles are global.
I on the other hand would like to see some code.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 16 Apr 1999 09:46:46 GMT
From: bart.lateur@skynet.be (Bart Lateur)
Subject: Re: Recursion not working properly
Message-Id: <371a0038.9451658@news.skynet.be>
Mike Rizzo wrote:
>I have a perl script in wihch a recursive call that I am attempting is not
>executing properly. The sub is called coparedirs(), when I call comparedirs
>from inside comparedirs, it does start exectuing compare dirs, but it seems
>as if the original call to comparedirs never completes running. Is there
>something I am missing about recursion in Perl that I should know about
>before attempting this execution.
Recursion? No. But I agree with Doris (whoever that may be :-). You may
be trying to keep a dirhandle open, while reopening for another read.
Solutions:
- use this at the start of your sub:
local *DIR;
if DIR is indeed the name of your dirhandle
- read all the direntries into a (localized) array, and process the
filenames from the arrays. That way you only need one dirhandle, but
maybe quite a bit of memory for large file systems. Nah.... But that
way, you can execute the processing any way you want, for example,
sorted alphabetically.
- "use File::Find;" instead of reinventing it.
Huh... which reminds me; I think this is a bug: on DOS, I get "." as a
file candidate too. Surely this wasn't intentional? It's a bit annoying
to have to filter this out myself. Each and every time.
Bart.
------------------------------
Date: 16 Apr 1999 09:16:45 GMT
From: Aidan Rogers <aidan@salvador.blackstar.co.uk>
Subject: Re: Scalar length and general Perl questions
Message-Id: <7f6v5t$dki$1@nclient3-gui.server.ntli.net>
David Cassell <cassell@mail.cor.epa.gov> wrote:
> Are you making sure that your integer will fit in storage? On many
> machines, Perl is compiled with an integer that will hold up to 2**32
> -1.
> That's 4,294,967,295. 10 digits. Perhaps you're getting an overflow.
> Have you checked to see what happens if you use Math::BigInt or if
> you translate your number to a string of digits long enough to hold what
> you require?
That's basically what I was needing to know. How to store an integer bigger
than the standard size. I just can't express myself very well when it comes
to this newsgroup. (I get intimidated by all the uber-gurus :). It's odd,
because I write computer articles in my spare time *shrug*
> You're a braver man than I am. :-)
> If you look in the FAQ [perlfaq1] you'll find a ref to where you can get
> info about Perl developments.
Brave, or stupid. Actually I'm Irish which is a fair mix of both :)
Aidan
------------------------------
Date: 16 Apr 1999 09:29:46 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: TZ not used in winnt Date/Time routines
Message-Id: <3716f4fa@newsread3.dircon.co.uk>
john gury <gury@interaccess.com> wrote:
> Does anyone know how to get the TZ var to work under winnt perl?
> I'm showing that regardless of TZ settings the timezone used is the
> unadjusted windows system timezone. Is this another "use a real
> OS to get it to work" issue?
I seem to recall it depends with whose C libraries the Perl was built.
Anyhow it shouldnt matter the NT settings should work properly. But I
would advocate switching OS just for the hell of it.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 16 Apr 1999 08:25:35 GMT
From: Jeremy Gurney <c4jgurney@my-dejanews.com>
Subject: Re: Unable to run perl
Message-Id: <7f6s5p$9mv$1@nnrp1.dejanews.com>
In article <NAtR2.769$dd.310694@WReNphoon3>,
padom@unmf.co.uk (Patrick Adom) wrote:
> I need help am unable to get Perl running on my windows nt IIS server. I
> have installed activestates activeperl in the command prompt I can run and
> example perl program but from with my web-browser this same program does not
> work.
>
Check the on line documentation that comes with the AS distribution and in
the section "ActivePerl FAQ" you will find a sub-section on "Web Server
Config" which contains "How do I configure Microsoft IIS 4.0 to support Perl
for Win32?"
If you try this and are still having problems then search the archive for this
group on Deja-News and you should turn up a few more helpful posts than this
one.
Jeremy Gurney
SAS Programmer | Proteus Molecular Design Ltd.
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 16 Apr 1999 09:35:11 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: warnings on Win32
Message-Id: <3716f63f@newsread3.dircon.co.uk>
Wyzelli <wyzelli@yahoo.com> wrote:
> I saw another post elsewhere where it was suggested to use #! -w
>
> Is this not going to work?
>
No Perl needs to see perl there.
> Or would #! perl -w
> be the way to make it work properly?
>
That'll work fine.
/J\
--
Jonathan Stowe <jns@gellyfish.com>
------------------------------
Date: Fri, 16 Apr 1999 09:45:35 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: warnings on Win32
Message-Id: <3717064e.150399593@news.insnet.net>
On Thu, 15 Apr 1999 22:21:55 GMT, "Allan M. Due" <All@n.due.net>
enlightened us thusly:
>Gus <spg@quokka.com> wrote in message
>news:3716518a.58650915@news.earthlink.net...
>: Seems simple but I can't figure how to turn on warnings in Win32
>: scripts (command line is not a problem)
>:
>: Unix is a layup:
>: #! /usr/bin/perl -w
>:
>: but since Win32 doesn't recognize the shebang, how would I turn on
>: warnings?
>
>Well, that is not quite true. The #! is recognized (in fact is has to be
>there)
Not true. Windows uses the file extension to determine what binary
executable to use to open the file. Perl itself looks at the #! but
it is not required.
I can't be bothered to test this, but is the space between the #! and
the /usr/bin/perl breaking it?
[Copying newsgroup posts to me by mail is considered rude]
--
David Cantrell, part-time Unix/perl/SQL/java techie
full-time chef/musician/homebrewer
http://www.ThePentagon.com/NukeEmUp
------------------------------
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 5397
**************************************
