[13252] in Perl-Users-Digest

home help back first fref pref prev next nref lref last post

Perl-Users Digest, Issue: 662 Volume: 9

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Fri Aug 27 13:07:16 1999

Date: Fri, 27 Aug 1999 10:05:13 -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, 27 Aug 1999     Volume: 9 Number: 662

Today's topics:
    Re: Computing loop over array problem <apter@panix.com>
    Re: Computing n.th root of a given number (M.J.T. Guy)
    Re: Computing n.th root of a given number (M.J.T. Guy)
        Dummy question NT&Perl <sylvain.bissonnette@videotron.ca>
    Re: FormMail problem recognizing <form name> attribute <jpeterson@office.colt.net>
    Re: FormMail problem recognizing <form name> attribute <smp9@*home.com>
        FTP transfer problem <maurerf@post.ch>
    Re: how print a string as hex? (M.J.T. Guy)
        How to chown a symbolic link in Perl? <seen@statoil.no>
    Re: How to chown a symbolic link in Perl? <tchrist@mox.perl.com>
    Re: Implementing a Perl Script on NT (Larry Rosler)
        internet radio script? <alt.ramones@trashsurfin.de>
    Re: internet radio script? <jpeterson@office.colt.net>
        Invalid C++ syntax in CPAN packages <bobklin@idt.net>
    Re: New Perl Book "Object Oriented Perl" not really ava (David Cantrell)
    Re: Newbie RegEx question (Larry Rosler)
        newbie: returning values from other programs within Per <m02izt00@cwcom.net>
    Re: newbie: returning values from other programs within (Anno Siegel)
    Re: package (M.J.T. Guy)
        Perl Jargon Question <ktham@tigerfund.com>
    Re: Perl Y2K Bugs on the Internet <russ_jones@rac.ray.com>
    Re: Perl Y2K Bugs on the Internet (Eric Bohlman)
    Re: Perl Y2K Bugs on the Internet (J. Moreno)
    Re: Perl Y2K Bugs on the Internet <gellyfish@gellyfish.com>
    Re: Perl.exe has an interpreted mode? <revjack@radix.net>
    Re: permissions problems on mounted vfat filesystem <jpeterson@office.colt.net>
    Re: Question about date (M.J.T. Guy)
    Re: Request for Comments: www.perl.com (Chris Nandor)
        STDIN, Arrays and Win32 mfergus98@hotmail.com
        Digest Administrivia (Last modified: 1 Jul 99) (Perl-Users-Digest Admin)

----------------------------------------------------------------------

Date: Fri, 27 Aug 1999 10:58:01 -0400
From: "stevan apter" <apter@panix.com>
Subject: Re: Computing loop over array problem
Message-Id: <7q68qg$na1$1@news.panix.com>

i don't see as many "puzzle posts" on c.l.p.misc as i thought i would.
puzzles are nice because they can be used to illustrate narrow points
of difference between languages.  (i take my cue from tom c's recent
foray into the python group.)

i've already given a competing k solution to a previous post ("Perl
puzzle: array of booleans to ranges").  this one offers an opportunity
to ask the perennial programming question:  why loop?

to solve this problem in k (http://www.kx.com), we deploy three primitives:

    . x        interpret x
    x >':y     "greater-than-prior":  y[i] > y[i-1], start with x
    & x        "where":  x[i]-many copies of i

thus, to compute the index of each item in s which is greater than the
previous item:

    s:"   6 34 23 33  7  0 2    03 "
    &0>':. s
  1 3 6 7

to test scaling, let's boost s to a million bytes:

    s:1000000#s

and time the expression:

    \t &0>':. s
  1201

a little more than a second on my 450 mhz pentium II.


<marcza@my-deja.com> wrote in message news:7q31u9$d9r$1@nnrp1.deja.com...
> Assume we have a string with an unknown number of pairs of numbers and
> spaces between them like:
>
> $str = "   6 34 23 33  7  0 2    03 ";
> Now I want to loop over these pairs and find out if more first parts
> greater then the refering second parts. If this is the case "y" should
> be returned otherwise "n":
>  6 < 34   -> second part greater
>  23 < 33  -> second part greater
>  7 > 0    -> first part greater
>  2 < 03   -> second part greater
> ---------------------------------
> sum          3 x second part greater - 1 x first part greater
>              => return("n")
>
> How is the shortest way of doing this ?
>
> This is my current (slow) solution:
>
> sub calc {
>     local($tmp) = $_[0];
>     $tmp = trim($tmp);  # removes leading/trailing spaces
>     $tmp = split(/ +/,$tmp);
>     local($w) = 0;
>     while(0 < $#tmp) {
>        if (pop(@tmp) < pop(@tmp)) {
>           $w++; }
>        else {
>           $w--; } }
>     return((( 0 <= $w) ? "n" : "y")); }
>
> Bye
> Marcus
>
>
>
>
>
> Sent via Deja.com http://www.deja.com/
> Share what you know. Learn what you don't.




------------------------------

Date: 27 Aug 1999 16:14:30 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Computing n.th root of a given number
Message-Id: <7q6dh6$l0e$1@pegasus.csx.cam.ac.uk>

David Cassell  <cassell@mail.cor.epa.gov> wrote:
>
>Well, you can 
>    use POSIX;
>to get the ceil() function.
>
>$x = ceil( log($n)/log(2) );

Rounding error alert!!

NEVER, NEVER, NEVER use the int() ( or ceil() ) function on a value if

a) it has been computed using inexact floating point        AND
b) the mathematically exact result would have been an exact integer.

So make that code

  $x = ceil( log($n - 0.5)/log(2) );

>Before you try doing this as int(...) + 1 
>consider how you'd handle the case where $n==1024 so you
>don't go up to the next integer.

With the above correction, the exact equality case can't arise, so you
can instead do

  $x = int( log(2*$n - 0.5)/log(2) );


But of course, none of the above versions deal with $n==0.


Mike Guy


------------------------------

Date: 27 Aug 1999 16:16:43 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Computing n.th root of a given number
Message-Id: <7q6dlb$l1h$1@pegasus.csx.cam.ac.uk>

In article <x3yvha3wvlt.fsf@tigre.matrox.com>,
Ala Qumsieh  <aqumsieh@matrox.com> wrote:
>
>marcza@my-deja.com writes:
>
>> Given is a integer number n say n=11.
>> I am searching the lowest integer number x which is
>> taken as power(2) greater equal that this number n. Read:
>
>	my $n = 11;
>	my $x = 1;
>
>	$x <<= 1 while $x <= $n;
>	$x >>= 1;
>
>or maybe:
>
>	my $n = 11;
>	my $x = 1;
>	$x <<= 1 while $x << 1 <= $n;

Neither of those gives the requested answer.

And as Larry has pointed out, methods using logs are better.


Mike Guy


------------------------------

Date: Fri, 27 Aug 1999 10:16:41 -0400
From: "Sylvain Bissonnette" <sylvain.bissonnette@videotron.ca>
Subject: Dummy question NT&Perl
Message-Id: <_5xx3.1456$nJ6.53209@wagner.videotron.net>

Hi,

    I'm completly lost, I install perl on my NT4.0 server with the web
server on my perl is in
c:\perl my web is in e:\wwwroot\myweb and my script in e:\wwwroot\scripts I
had put
/scripts in the virtual directory in the web server (by the way the web
server work fine and
i can acces the /scripts)

I had wote a very simple dummy script named hello.pl
print "hello\n";

if I type in the command line of the server hello.pl and crlf that work I
see hello.
the permision on /sripts & hello.pl are execute & read

but if I put in my web page
http://www.microsyl.com/scripts/hello.pl I never got back the reply of
hello,

please if some one can help me I don't know where to go with this problem.

Yours
sylvain.bissonnette@videotron.ca

Thanks for all






------------------------------

Date: Fri, 27 Aug 1999 14:16:22 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: FormMail problem recognizing <form name> attribute
Message-Id: <W4xx3.5$xa4.36@news.colt.net>

Shawn Powell <smp9@*home.com> wrote:
> I posted the following message in comp.lang.javascript and didn't get a
> single response--let's see if you guys are more helpful.

Well, the problem here is not Perl, nor is it your formmail.pl script. It is
either a Javascript problem, or a CGI problem. In neither case can this
group help you. You must must either find a group about cgi or a group 
about Javascript, and see if they can help.




------------------------------

Date: Fri, 27 Aug 1999 15:11:37 GMT
From: Shawn Powell <smp9@*home.com>
Subject: Re: FormMail problem recognizing <form name> attribute
Message-Id: <JUxx3.9547$y03.1924@news.rdc1.ct.home.com>

Okay, I guess that's what I needed to know.  I thought maybe the problem was
with how the Perl script was processing my form data, and I was hoping to get a
suggestion from somebody who is familiar with FormMail.pl.  I'll try another
newsgroup.  Thanks for reading, and I'm sorry if I mis-posted.

Shawn Powell
=======================================

Jon Peterson wrote:

> Shawn Powell <smp9@*home.com> wrote:
> > I posted the following message in comp.lang.javascript and didn't get a
> > single response--let's see if you guys are more helpful.
>
> Well, the problem here is not Perl, nor is it your formmail.pl script. It is
> either a Javascript problem, or a CGI problem. In neither case can this
> group help you. You must must either find a group about cgi or a group
> about Javascript, and see if they can help.

--
===================================================
Shawn Powell
smp9@*home.com
To e-mail me, remove the asterisk from my address.
===================================================

Do not meddle in the affairs of dragons, for you are crunchy and taste good with
ketchup.




------------------------------

Date: Fri, 27 Aug 1999 18:04:45 +0200
From: "Felix Maurer" <maurerf@post.ch>
Subject: FTP transfer problem
Message-Id: <7q6b67$b1h$1@wcwe00a6.post.ch>

In one of my perl script, i'm reading files beeing transfered by an other
node with ftp. With some big files, it appends sometimes that the files are
not completly transfered as my script want to process it.

Have you an idea how to coordinate the transfer with the processing of the
script?

Thanks in advance for any hints.

Felix




------------------------------

Date: 27 Aug 1999 16:34:40 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: how print a string as hex?
Message-Id: <7q6en0$lqs$1@pegasus.csx.cam.ac.uk>

Helmut Richter <Helmut.Richter@lrz-muenchen.de> wrote:
>
>Do you know where pack and unpack are described so that one
>understands what they actually do? According to what I found, unpack
>unpacks things into a *list* of scalars but here I wanted it to
>produce one single scalar. Nice that it works but I do not know why.

In the documentation that comes with perl5.006.   But you'll have to wait
for that.       :-)


Mike Guy


------------------------------

Date: Fri, 27 Aug 1999 16:57:09 +0200
From: "Stein-Erik Engbråten" <seen@statoil.no>
Subject: How to chown a symbolic link in Perl?
Message-Id: <37C6A745.289AE2D3@statoil.no>

Hello!

How do I change the UID and/or GID on a symbolic link in Perl (this is
on Unix machines, by the way...:-)

The &chown(...) call follows the link, which isn't what I want in this
case. I want to change the UID and/or GID on the symlink itself, not
what it points to.

I can always check for a symlink, and call the OS function through
system(..). But it is a lot of work, since I have to now if it is the
UID or the GID that is changed, I have to know where chown/chgrp is on
each Unix OS, etc etc. In addition, some older OS'es (like SunOS 4 and
HP-UX 9) don't support the '-h' option to chown/chgrp...:-(

Regards,
  Stein-Erik



------------------------------

Date: 27 Aug 1999 09:43:03 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: How to chown a symbolic link in Perl?
Message-Id: <37c6b207@cs.colorado.edu>

     [courtesy cc of this posting mailed to cited author]

In comp.lang.perl.misc, 
    "Stein-Erik Engbråten" <seen@statoil.no> writes:
:How do I change the UID and/or GID on a symbolic link in Perl (this is
:on Unix machines, by the way...:-)

Perl doesn't do this.  Do you know why many systems don't support the
idea?  Because it conveys no distict functionality.  Modes and owners
and times on symbolic links have no meaning.  So why bother?  And it's
very non-portable.  

--tom
-- 
"Bjarne Stroustrup was sharing a cubicle with me at the time he was creating
C++. That's part of the reason why I don't use it." --Rob Pike


------------------------------

Date: Fri, 27 Aug 1999 08:23:42 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Implementing a Perl Script on NT
Message-Id: <MPG.12304d52a35d0108989eb9@nntp.hpl.hp.com>

In article <MPG.1230b6656cbe7c92989c8d@news-server> on Fri, 27 Aug 1999 
13:51:57 +1000, elephant <elephant@squirrelgroup.com> says...
> Larry Rosler writes ..
> >In article <MPG.12309a4d110ecf3f989c8a@news-server> on Fri, 27 Aug 1999 
> >11:52:03 +1000, elephant <elephant@squirrelgroup.com> says...
> >> Larry Rosler writes ..
> >> >In article <7q51h7$mm1$1@news.vsnl.net.in> on Thu, 26 Aug 1999 22:46:45 
> >> >+0530, Julie Tuck <iwebmaster@email.com> says...
> >> >> I have made a perl script that works perfectly well on a Unix server,, but
> >> >> now  I require to Execute it on an NT server, could you please tell what
> >> >> chanes  should make in the script to make it work on an NT server.
 ...
> don't know what "standard CGI program" is .. assuming that you mean a 
> "simple CGI program" - then .. true .. porting such programs is easy .. 
> but I didn't read anything that seemed to indicate that this is a simple 
> CGI program

'perl script' 'Unix server' 'NT server'

> >As for the documentation, perlport says hardly anything about it other 
> >than the filenames, and the ActivePerl docs (except for Quirks) don't 
> >say much either.
> 
> hmm I don't know if I agree with your comments on perlport .. my 
> perlport lists all the functions that have problems and the operating 
> systems that those problems happen on

We are only talking about Unix vs Windows NT, so the DOS/Windows section 
is all that is relevant.

 ...

> binmode() would probably also be worth mentioning in CGI context .. 
> certainly it comes up in a lot of what I would call "standard CGI 
> programs"

No, it shouldn't be a porting issue.  And it wouldn't be if our 'Perl 
educators' would get their heads on straight.  There is no reason 
*whatsoever* for not using binmode on binary files on a Unix system, and 
it should be taught that way!

I was very pleased to see Sam Holden describe the absence of binmode for 
binary files or streams as a bug.
 
> and those three assume that your guess is correct about it being CGI 
> (which you might have thought to mention in your original)
> 
> dunno .. I just think that it might not be the best advice - 
> recommending that other than system calls and filenames everything else 
> ought to work

It has to be tested in any case.

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


------------------------------

Date: Fri, 27 Aug 1999 14:14:13 GMT
From: Andy Ramone <alt.ramones@trashsurfin.de>
Subject: internet radio script?
Message-Id: <7q66f9$jho$1@nnrp1.deja.com>

Hi,
I'd like to know if there's a cgi/java script out there which manages a
internet radio show from a .ram file and gives the listener information
to every song already playing? Don't know what I mean? Look here for an
example show:
http://www.imagineradio.com/mymusiclisten.asp?name=trashsurfin
How is such a show managed? Can this be done with a cgi or java script?
Who can help me?


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.


------------------------------

Date: Fri, 27 Aug 1999 14:39:01 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: internet radio script?
Message-Id: <9qxx3.8$xa4.36@news.colt.net>

Andy Ramone <alt.ramones@trashsurfin.de> wrote:
> Hi,
> I'd like to know if there's a cgi/java script out there which manages a
> internet radio show from a .ram file and gives the listener information
> to every song already playing? Don't know what I mean? Look here for an

I'm not aware of one. I'm not aware of a Perl API to real server or the 
real audio format - there is perhaps more likely to be a Java API for this
sort of thing. More likely still, Real Networks have a product that will do
just what you need - for a price, of course.

> Who can help me?

An intermediate to advanced programmer with experience of Real Audio 
technology.




------------------------------

Date: Fri, 27 Aug 1999 11:41:57 -0400
From: "Bob Kline" <bobklin@idt.net>
Subject: Invalid C++ syntax in CPAN packages
Message-Id: <7q6bki$mbf@nnrp4.farm.idt.net>

Does anyone know why so many of the CPAN distributions include code which
uses K&R function definitions, which are not legal C++?  The first time I
hit
a package with this problem, I reported it to the maintainer of the package,
who said it had already been reported, but not fixed.  So I fixed all the
function
definitions and sent him a diff file for patch.  But I've seen the same
problem
in enough packages (latest is in Storable-0.6@4) that I'm beginning to
suspect
that something else is going on.  Any clues?

Bob Kline




------------------------------

Date: Fri, 27 Aug 1999 15:21:33 GMT
From: NukeEmUp@ThePentagon.com (David Cantrell)
Subject: Re: New Perl Book "Object Oriented Perl" not really available ...yet
Message-Id: <37c6acca.97773761@news.insnet.net>

On Tue, 24 Aug 1999 16:06:59 GMT, gmmengel@my-deja.com said:

>Just a note to let all know that Manning publishers has opened the door
>via their web site (www.manning.com) to order the new book "Object
>Oriented Perl" by Damian Conway.  The printer is NOT ready yet.  If you
>order the book, you will get "Object Oriented Application Frameworks".
>Not what the doctor ordered..
>You might want to wait another week or so if you want this book.  By
>the way, the distributor Bookmasters Distribution Service, has been
>more than helpful.  My emails to Manning though were not answered, sad
>to say.

Au contraire, it _is_ now available.  My copy arrived on Tuesday.

[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: Fri, 27 Aug 1999 08:40:52 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Newbie RegEx question
Message-Id: <MPG.1230515bf44ebca6989eba@nntp.hpl.hp.com>

In article <37C6908F.FFD703@altavista.net> on Fri, 27 Aug 1999 15:20:15 
+0200, Georg Weissenbacher <georg.weissenbacher@altavista.net> says...
> Steffen Koehler wrote:
> > Doug Bennett (dbennett@hsstelford.freeserve.co.uk) wrote:
> > man perlre
> > 
> > but for this time use /t.*s.*j/
> 
> /t.*s.*j/i

  /t.*s.*j/is

-- 
(Just Another Larry) Rosler
Hewlett-Packard Laboratories
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com


------------------------------

Date: Fri, 27 Aug 1999 16:21:20 +0100
From: Hazel & Norman Teferle <m02izt00@cwcom.net>
Subject: newbie: returning values from other programs within Perl
Message-Id: <37C6ACEE.C1EF5A9E@cwcom.net>

Hello all,

what is the best way to return values from a C program or shell script
when called within a perl program?
so far: I let the programs create a file and then read the content with
Perl, but there must be a better more elegant way.

can anyone help, I am sure it is pretty easy!!!
thanks very much anyway



------------------------------

Date: 27 Aug 1999 16:43:10 -0000
From: anno4000@lublin.zrz.tu-berlin.de (Anno Siegel)
Subject: Re: newbie: returning values from other programs within Perl
Message-Id: <7q6f6u$k24$1@lublin.zrz.tu-berlin.de>

Hazel & Norman Teferle  <hazel.norman@stones.com> wrote in comp.lang.perl.misc:
>Hello all,
>
>what is the best way to return values from a C program or shell script
>when called within a perl program?
>so far: I let the programs create a file and then read the content with
>Perl, but there must be a better more elegant way.

Look into the backtick operator and the open function.

Anno


------------------------------

Date: 27 Aug 1999 17:03:04 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: package
Message-Id: <7q6gc8$mvt$1@pegasus.csx.cam.ac.uk>

In article <7q1h2n$af0$1@nnrp1.deja.com>,  <belg4mit@mit.edu> wrote:
>Excellent. What about use? (as opposed to do or require?)

"use" and "require" should be the same in this respect.

Each of Gareth's suggestions should yield the same results in the two cases.

Though, as always, if you're swapping about between "use" and "require",
you'll need to keep a clear head about compile time vs run time.


Mike Guy


------------------------------

Date: Fri, 27 Aug 1999 12:57:24 -0400
From: Kai Tham <ktham@tigerfund.com>
Subject: Perl Jargon Question
Message-Id: <37C6C374.6D57226E@tigerfund.com>

Hello there,


Could someone explain what the following means?

in Main.pl
Utility->fn(\@array);

in Utility.pm
sub fn($) {
    my $Class = shift;
    $" = "|";
    $ArrayRef = @_[0];

    @$ArrayRef = (
        qq{"$$ArrayRef[0]"},$",
        $$ArrayRef[1],$",
        uc(qq{"$$ArrayRef[2]"})
    );
    return 1;
}

I am especially interested in how qq{""} and uc() work.
Could you also reply to kai_tham@tigerfund.com?

Thanks in advance.

Kai




------------------------------

Date: Fri, 27 Aug 1999 08:43:02 -0500
From: "Russ Jones" <russ_jones@rac.ray.com>
Subject: Re: Perl Y2K Bugs on the Internet
Message-Id: <7q64mr$nbi@eoits1.eo.ray.com>


Bart Lateur wrote in message <37d45046.7566248@news.skynet.be>...
>
>And the optimists expect unix to use 64 bit timestamps by the time it
>becomes too relevant (was it 2038, or 2034?), while still maintaining
>backward compatibility for the programmer.
>
Yeah, and us optimists* back in the 60's knew damn good and well that our
shiny new  COBOL and system 360 assembler and autocoder (I'm really old)
programs with two-character year fields would still be running in 1999 and
we'd be able to make major bucks fixing them because we would be the only
ones left that still knew COBOL and assembler and autocoder**.

*Murphy was an optimist.

** Okay, nobody admits to knowing autocoder anymore. I may be old but I
ain't senile.






------------------------------

Date: 27 Aug 1999 14:59:25 GMT
From: ebohlman@netcom.com (Eric Bohlman)
Subject: Re: Perl Y2K Bugs on the Internet
Message-Id: <7q694d$geu@dfw-ixnews9.ix.netcom.com>

Jonathan Stowe (gellyfish@gellyfish.com) wrote:
: In comp.lang.perl.misc finsol@ts.co.nz wrote:
: > This posting relates to C/C++, Java and Javascript developers, but is of
: > particular interest to those developing in Perl.
: > 
: 
: It appears that Ms Amon has some particular animus toward Perl as a
: programming language.  For those in newsgroups that have less experience

Actually, her animus is toward people who insist (correctly) that Y2K
problems in programs are the result of bad design in those *programs*
rather than in the *languages* those programs are written in.  PHB-types
have wet dreams about languages designed with the goal of preventing
"programmers" with little-to-no experience from making mistakes, since if
such a language were to exist, they could hire newbies to do all their
programming tasks, and replace them before they became experienced enough
to demand more money.  Cost-cutting is the kind of thing managers get
promoted for, even when it really amounts to merely *shifting* costs to a
time after said manager gets promoted (note that there's a popular, but
wrong "common-sense" argument that says this shouldn't happen, namely that
when the shifted costs show up, the manager who shifted them will be
blamed, demoted, fired, etc.  In reality that will happen *only* if the
decision to promote the cost-shifting manager was made my the *owner* of
the company.  If the person making the decision reports to a higher-up who
makes promotion decisions about *him*, taking action against the
cost-shifting promotee amounts to an admission to his superiors that the
promoter fucked up, something that's rather taboo in most hierarchies). 

This is basically a cultural war.  Larry's stated goals in creating Perl
are incompatible with a sandbox language for non-programmers.  Much of
Perl's usefulness comes from the fact that a knowledgable programmer
doesn't have to devote any efforts to work-arounds for attempts on the
part of the compiler to second-guess him.  What Ms. Amon seems to want is
the programming-language equivalent of an application that works like: 
 
<dialog>
Exit without saving changes (Y/N)? Y

Exiting at this point will lose any changes you made in this session.  
Continue (Y/N)? Y

Are you *really* sure you want to exit and lose any changes (Y/N)? Y
</dialog>

Such systems are designed on the assumption that it is both possible and 
desireable for useful work to be accomplished by people who don't know 
what they're doing.  In reality, *all* they do is make it extremely 
difficult for people who *do* know what they're doing; the clueless have 
just as much trouble with such systems as they do with properly-designed 
ones.

I just realized, and find rather interesting, that Visual Basic and its 
derivatives did *not* make it onto Ms. Amon's hit-list.
 


------------------------------

Date: Fri, 27 Aug 1999 11:44:24 -0400
From: planb@newsreaders.com (J. Moreno)
Subject: Re: Perl Y2K Bugs on the Internet
Message-Id: <1dx71pt.gea6pz6hm4xaN@roxboro0-0062.dyn.interpath.net>

Bart Lateur <bart.lateur@skynet.be> wrote:

> Luis E. Rodriguez wrote:
> 
> >Any comments?
> 
> Apart from the crossposting (;-), you got it.
> 
> And the optimists expect unix to use 64 bit timestamps by the time it
> becomes too relevant (was it 2038, or 2034?), while still maintaining
> backward compatibility for the programmer.

And even the pessimist expect it to go to unsigned numbers before then,
so that it get's pushed back another 70 years.

-- 
John Moreno


------------------------------

Date: 27 Aug 1999 17:04:06 +0100
From: Jonathan Stowe <gellyfish@gellyfish.com>
Subject: Re: Perl Y2K Bugs on the Internet
Message-Id: <37c6b6f6_1@newsread3.dircon.co.uk>

In comp.lang.perl.misc Eric Bohlman <ebohlman@netcom.com> wrote:
> 
> I just realized, and find rather interesting, that Visual Basic and its 
> derivatives did *not* make it onto Ms. Amon's hit-list.
>  

Which is particularly strange wierd because Visual Basic does have a problem
with its date handling.

/J\
-- 
"I can't believe Elton John recorded that song again. Exactly how do you
live your life like a spurgis in the wind?" - Ronnie, Veronica's Closet


------------------------------

Date: 27 Aug 1999 14:08:59 GMT
From: revjack <revjack@radix.net>
Subject: Re: Perl.exe has an interpreted mode?
Message-Id: <7q665r$e0d$1@news1.Radix.Net>
Keywords: Hexapodia as the key insight

Martien Verbruggen explains it all:
:In article <7q528s$t6a$1@news1.radix.net>,
:	revjack <revjack@radix.net> writes:
:> I noted that "perl.exe" was cited, and MS software was used to post the
:> article, so I presumed an MS OS. Ctrl-Z exits perl.exe on those systems
:> without running the program; Ctrl-D submits the program and runs it.

:On NT both ^D and ^Z will end the input for perl, but they do need to
:be followed by a return, which is slightly unnatural behaviour. ^Z is
:the normal EOF for NT and other MS products. I suspect the allowance
:of ^D and ^Z both is programmed as opposed to a shell thing. But I
:might be wrong.

That's true for NT, thank you for the clarification.

Under Win98, ^D runs the input, ^Z exits without running.

I don't know what happens under Win95.

I recommend that users of any Windows-based perl use ^D.


------------------------------

Date: Fri, 27 Aug 1999 14:19:23 GMT
From: Jon Peterson <jpeterson@office.colt.net>
Subject: Re: permissions problems on mounted vfat filesystem
Message-Id: <L7xx3.6$xa4.36@news.colt.net>

James Cohen <james.usenet@jump-around.com> wrote:
> Hi,

> Thanks for taking the time to read this message.

> I am having problems with a perl / cgi script.  The script should be
> creating a directory on a mounted vfat file system.  I am using Redhat
> 6.0 and because of the way (single user) the permissions are set up I am
> unable to create the directory.

I don't think the perl script is the problem Perl cannot overide Unix
file permissions. You need a way to run the cgi script as a user that has
the required permissions. This is a question relevant to the fields of
CGI, http servers, and unix system administration, but not to Perl.

If you are the sysadmin for the machine, the problem will be reasonably easy
to solve. If you are not, don't waste your time trying to figure it out - 
simply ask your sysadmin if they will let you do this, and you should get
a pretty simple yes or no answer.



------------------------------

Date: 27 Aug 1999 16:56:26 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: Question about date
Message-Id: <7q6fvq$mko$1@pegasus.csx.cam.ac.uk>

David Cassell  <cassell@mail.cor.epa.gov> wrote:
   [ lots of examples relating to
>> % perldoc -f -X

This and the preceding post had lots of information about *Perl* versions,
but none about *perldoc* versions.   (And note that includes the Perl
instance bound into the perldoc, not just the value of $VERSION. )

The experiments I reported were all done using commands of the form

    perl5.004_05/bin/perldoc -f -X

which avoid many potential confusions.


Mike Guy


------------------------------

Date: Fri, 27 Aug 1999 15:34:21 GMT
From: pudge@pobox.com (Chris Nandor)
Subject: Re: Request for Comments: www.perl.com
Message-Id: <pudge-2708991134260001@192.168.0.16>

In article <slrn7rqogc.bq6.abigail@alexandra.delanet.com>,
abigail@delanet.com wrote:

# James Powell (jamespo@N0SPAM.yahoo.com) wrote on MMCLXXX September
# MCMXCIII in <URL:news:37BD4288.59FB2D40@N0SPAM.yahoo.com>:
# 
# == A useful non-WWW addition would be a news server (news.perl.com?)
# == with many specific groups on DBI, CGI, XML, daemons, win32, etc. 
# == Perhaps with a web interface to this as well.
# 
# *boggle* A news group isn't a news group unless it's propagated over
# the regular Usenet channels.

Regardless of how useful it would be, there is such a thing as a private
news server.  It doesn't have to be available to all of Usenet to be a
newsgroup.

-- 
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])


------------------------------

Date: Fri, 27 Aug 1999 14:32:51 GMT
From: mfergus98@hotmail.com
Subject: STDIN, Arrays and Win32
Message-Id: <7q67ii$k6g$1@nnrp1.deja.com>

I'm a newbie...

How do you end an array using STDIN in Win32?  I've tried both CTRL-D
and CTRL-Z, but neither have worked correctly.

Thanks,
       Mark


Sent via Deja.com http://www.deja.com/
Share what you know. Learn what you don't.


------------------------------

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 662
*************************************


home help back first fref pref prev next nref lref last post