[11008] in Perl-Users-Digest
Perl-Users Digest, Issue: 4608 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sat Jan 9 22:07:16 1999
Date: Sat, 9 Jan 99 19:00:17 -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, 9 Jan 1999 Volume: 8 Number: 4608
Today's topics:
Re: Accessing User files from CGI without files being W <gellyfish@btinternet.com>
Re: c to perl (Alan Barclay)
Re: Filelisting of Dir & Subdir <design@raincloud-studios.com>
Re: Help Wanted <preble@ipass.net>
How can I compare two arrays? cgi@higherlove.com
Re: How can I compare two arrays? <due@murray.fordham.edu>
JARS Reviewers Wanted webmaster@jars.com
Re: make for win-32 system (Randy Kobes)
Math parser (Claes Bjorklund)
Re: Math parser (Randy Kobes)
Re: Math parser <ajohnson@gatewest.net>
Re: Perl Criticism <rra@stanford.edu>
Re: Perl Criticism <rra@stanford.edu>
Re: Perl Criticism <gellyfish@btinternet.com>
Re: Perl Criticism <mds-resource@mediaone.net>
Re: Perl Criticism <ajohnson@gatewest.net>
Re: Perl Criticism topmind@technologist.com
Re: Perl Criticism <chatmaster@c-zone.net>
Perl modules compatibility, in UNIX and DOS. <julius@clara.net>
Re: Perl within Perl backslashxt@yahoo.com
Remote File Information Gathering: Need Help (S.F.)
Re: Uploading PC files works - but not Mac files (John Moreno)
Re: Way to measure memory / performance hits of script? (Ilya Zakharevich)
Re: Way to measure memory / performance hits of script? <design@raincloud-studios.com>
Why doesn't it work? <harrigan@mailexcite.com>
Re: Why doesn't it work? (Alastair)
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: 9 Jan 1999 23:24:22 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Accessing User files from CGI without files being WordWritable
Message-Id: <778of6$o5$1@gellyfish.btinternet.com>
On 9 Jan 1999 22:47:52 GMT Charles R. Thompson wrote:
>
> From FZ's Joe's Garage...
> "You'll love it, it's a way of life"
>
Well just dont get no jizz upon the sofa ;-}
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: 10 Jan 1999 01:24:01 GMT
From: gorilla@elaine.drink.com (Alan Barclay)
Subject: Re: c to perl
Message-Id: <915931414.482118@elaine.drink.com>
In article <777lp2$im$1@gellyfish.btinternet.com>,
Jonathan Stowe <gellyfish@btinternet.com> wrote:
>On Sat, 09 Jan 1999 06:45:50 GMT webmaster@galilnet.co.il wrote:
>> Is there a utility that converts c to perl?
>
>Pick one of :
>
> A) Yeah its called your brain ...
Not Tom Christensen?
------------------------------
Date: 9 Jan 1999 23:00:45 GMT
From: "Charles R. Thompson" <design@raincloud-studios.com>
Subject: Re: Filelisting of Dir & Subdir
Message-Id: <778n2t$748@bgtnsc03.worldnet.att.net>
Charles R. Thompson wrote in message
<76luqh$1an@bgtnsc03.worldnet.att.net>...
>>Could someone please show me an example of how to have listed all
files of
>a
>>directory & its subdirectories (to push them lateron into an array) ?
>>The only input needed is a physical root-directory like 'c:\data\' .
>Feel free to ask anything about the code.
Except how stupid I am to be using it. What a waste of resources.
Still learning,
CT
------------------------------
Date: Sat, 9 Jan 1999 18:08:31 -0500
From: "E. Preble" <preble@ipass.net>
Subject: Re: Help Wanted
Message-Id: <6lRl2.298$24.1046@news.ipass.net>
Can someone remove this message? Do we -really- have to look at
it until 1/4/00?
Who runs this newsgroup?
------------------------------
Date: Sun, 10 Jan 1999 02:02:15 GMT
From: cgi@higherlove.com
Subject: How can I compare two arrays?
Message-Id: <36980967.32296180@news.phnx.uswest.net>
I've been cracking the books and poring over code trying to figure
this out, but I can't find ANYTHING!
If I have two arrays
@a which consists of the words "here", "i", and "am"
@b which consists of the words "do", "i", and "too"
How can I run some type of "for each" routine that compares each item
in @a to each item in @b and then exit when a match is found?
Thanks!
Lisa
------------------------------
Date: 10 Jan 1999 02:46:52 GMT
From: "Allan M. Due" <due@murray.fordham.edu>
Subject: Re: How can I compare two arrays?
Message-Id: <7794as$sqe$0@206.165.165.144>
cgi@higherlove.com wrote in message
<36980967.32296180@news.phnx.uswest.net>...
|I've been cracking the books and poring over code trying to figure
|this out, but I can't find ANYTHING!
|If I have two arrays
|@a which consists of the words "here", "i", and "am"
|@b which consists of the words "do", "i", and "too"
|
|How can I run some type of "for each" routine that compares each item
|in @a to each item in @b and then exit when a match is found?
Well, how about:
#!/usr/local/bin/perl -w
use strict;
my @a = qw(here i am);
my @b = qw(do i too);
my $i=0;
foreach (@a) {
if ($a[$i] eq $b[$i]) {print "match of $a[$i] with $b[$i] at $i."; last}
$i++;
}
HTH
AmD
------------------------------
Date: Sun, 10 Jan 1999 01:42:20 GMT
From: webmaster@jars.com
Subject: JARS Reviewers Wanted
Message-Id: <7790ht$c2p$1@nnrp1.dejanews.com>
JARS - ( http://www.jars.com ) has added several new topic areas for
submission/review at our website. These areas include sections for Java,
Javascript, DHTML, JavaBeans, Flash/Shockwave, ActiveX, VRML, PERL and other
such resources of interest to developers. In conjunction with these additions
we are seeking developers to volunteer as reviewers for the JARS site. If you
are experience in any of the previously listed topics we certainly welcome
your assistance.
Should you have an interest please fill out the online application at:
( http://www.jars.com/jars_judges_chambers_apply.html ). We are also accepting
new resources for the categories listed above at the site.
Additonal URL's:
http://www.jars.com/jars_judges_chambers_judges.html
Thanks in advance..
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 10 Jan 1999 00:37:13 GMT
From: randy@theory.uwinnipeg.ca (Randy Kobes)
Subject: Re: make for win-32 system
Message-Id: <slrn79fu3q.fhc.randy@theory.uwinnipeg.ca>
On Sat, 9 Jan 1999 15:49:08 -0500, Bill Catlan <wcatlan@bccom.com> wrote:
>I need the nmake utility for Win32. Any ideas where to get a copy?
Hi,
Try ftp://ftp.microsoft.com/Softlib/MSLFILES/nmake15.exe
--
Best regards,
Randy Kobes
Physics Department Phone: (204) 786-9399
University of Winnipeg Fax: (204) 774-4134
Winnipeg, Manitoba R3B 2E9 e-mail: randy@theory.uwinnipeg.ca
Canada http://theory.uwinnipeg.ca/
------------------------------
Date: 10 Jan 1999 01:47:28 GMT
From: claes@canit.se (Claes Bjorklund)
Subject: Math parser
Message-Id: <claes-1001990300250001@p58.one.canit.se>
Hi
I would like to to parse mathematical matrices to perl and then calculate
the result, I think I can use the PDL modules from CPAN
exampel
A=[1 2 3;3 4 6;1 2 3]
B=[3 2 3;3 2 6;5 7 8]
d=5
C=A*B*d
result:
C =
120 135 195
255 280 405
120 135 195
Have used the same notation like in Matlab
Have someone any ideas? let me know
\Claes
------------------------------
Date: 10 Jan 1999 02:00:29 GMT
From: randy@theory.uwinnipeg.ca (Randy Kobes)
Subject: Re: Math parser
Message-Id: <slrn79g2vt.g8t.randy@theory.uwinnipeg.ca>
On 10 Jan 1999 01:47:28 GMT, Claes Bjorklund <claes@canit.se> wrote:
>I would like to to parse mathematical matrices to perl and then calculate
>the result, I think I can use the PDL modules from CPAN
Hi,
Have you looked at the Math::Matrix* modules on CPAN? If your
matrices aren't too big, perhaps one of these would help.
--
Best regards,
Randy Kobes
Physics Department Phone: (204) 786-9399
University of Winnipeg Fax: (204) 774-4134
Winnipeg, Manitoba R3B 2E9 e-mail: randy@theory.uwinnipeg.ca
Canada http://theory.uwinnipeg.ca/
------------------------------
Date: Sat, 09 Jan 1999 20:20:46 -0600
From: Andrew Johnson <ajohnson@gatewest.net>
Subject: Re: Math parser
Message-Id: <36980E7E.3042F566@gatewest.net>
Claes Bjorklund wrote:
>
> Hi
>
> I would like to to parse mathematical matrices to perl and then calculate
> the result, I think I can use the PDL modules from CPAN
>
> exampel
>
> A=[1 2 3;3 4 6;1 2 3]
> B=[3 2 3;3 2 6;5 7 8]
> d=5
>
> C=A*B*d
>
> result:
>
> C =
>
> 120 135 195
> 255 280 405
> 120 135 195
>
> Have used the same notation like in Matlab
>
> Have someone any ideas? let me know
yes the PDL modules will allow what you want... here's your
example running in the perldl shell (interactive PDL shell):
perldl> $A = pdl [ [1,2,3], [3,4,6], [1,2,3] ]
perldl> $B = pdl [ [3,2,3], [3,2,6], [5,7,8] ]
perldl> $d = 5;
perldl> $C = $A x $B * $d
perldl> print $C
[
[120 135 195]
[255 280 405]
[120 135 195]
]
hope that helps
regards
andrew
------------------------------
Date: 09 Jan 1999 15:12:31 -0800
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Perl Criticism
Message-Id: <yllnjc82hs.fsf@windlord.stanford.edu>
topmind <topmind@technologist.com> writes:
> I challenged someone to show me why Perl's power cannot be cleaned up
> without significant (initial) productivity loss. I have not seen any
> yet.
Perhaps because many of us believe that, like nearly all programming
languages, Perl is as "clean" as the programmer wishes it to be. You can
write clean Perl and you can write obfuscated Perl, things like my sig.
My production code doesn't look anything at *all* like my signature, and
if someone tried to do something like that in a production script, I'd
have a long talk with them.
The same is true of most languages. The dichotomy you're presenting is
not one that many of us agree with, so your challenge doesn't mean
anything to us.
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: 09 Jan 1999 15:17:27 -0800
From: Russ Allbery <rra@stanford.edu>
Subject: Re: Perl Criticism
Message-Id: <yliueg829k.fsf@windlord.stanford.edu>
topmind <topmind@technologist.com> writes:
> However, I am suggesting getting rid of X_ altother. They'r too risky in
> the hands of idiots.
This line, in isolation, may explain why you dislike Perl. The notion of
avoiding constructs in the *language* because they're too risky in the
hands of idiots is completely contrary to the philosophy of Perl. Perl
assumes that the programmer will pay attention to what they're doing and
not use constructs they don't understand until they're ready to make them
clear.
> No no no no! 20 LOCAL Variables. Why have a list like this:
> local(foo, bar, smoo, smar, fart, tart, bla, bra)
> When all you need is one keyword, "isolate". It also saves typing P-)
Well, for one thing, if you're using local (as opposed to my) on that many
variables, you're probably doing something wrong. I'd take another look
at your algorithm.
But for another, doesn't this just reduce to the old argument over whether
or not to declare variables? Do you prefer FORTRAN's implicit variable
declaration model?
> Why have 10 different ways to do things.
One of the big reasons is that it makes programming more enjoyable for the
programmer. One of the wonderful things about Perl and the Perl community
is that the merits of doing that are understood and considered in the
language design.
> It might save 30% typing, but results in programs that are 300% harder
> to read.
Or it can make programs considerably easier to read if one takes advantage
of the flexibility to use the construct appropriate to what one is trying
to do.
--
#!/usr/bin/perl -- Russ Allbery, Just Another Perl Hacker
$^=q;@!>~|{>krw>yn{u<$$<[~||<Juukn{=,<S~|}<Jwx}qn{<Yn{u<Qjltn{ > 0gFzD gD,
00Fz, 0,,( 0hF 0g)F/=, 0> "L$/GEIFewe{,$/ 0C$~> "@=,m,|,(e 0.), 01,pnn,y{
rw} >;,$0=q,$,,($_=$^)=~y,$/ C-~><@=\n\r,-~$:-u/ #y,d,s,(\$.),$1,gee,print
------------------------------
Date: 9 Jan 1999 23:57:33 -0000
From: Jonathan Stowe <gellyfish@btinternet.com>
Subject: Re: Perl Criticism
Message-Id: <778qdd$ob$1@gellyfish.btinternet.com>
On Sat, 09 Jan 1999 22:28:06 GMT topmind@technologist.com wrote:
> In article <36961899.4AC48014@perspex.com>,
> Tripp Lilley <tripp.lilley@perspex.com> wrote:
>>
>> Do not blame the language for the faults of the speaker.
>
>
> WRONGO!
> I strongly disagree with this statement. From a manager's
> perspective (which I am not), you have to pick a language that
> will give you the best results based on how a typical employee
> interacts with it. (Unless you have the uncanny ability
> to weed out idiots.)
>
Get a grip. From a managers perspective (which I am), I pick a language
that synthesiszes the previous skills and experience of those people that
will work with it with the best utility for achieving the task at hand
within the deadline - sometimes causing someone to learn a new language is
more advantageous than having them attempt a job in a language that is
patently unsuited to the task. A manager trying to get a project through
isnt dealing with a typical employee they are dealing with those resources
that they have available at the time - Exceptionally we might have the
luxury to hire people on demand but I would suggest that is rare.
>
> You have to consider the WHOLE environment of a language,
> NOT just its POTENTIAL under ideal conditions.
> The world is full of idiots and con-artists. Languages
> should take that into consideration.
>
Forget it ! Are you suggesting that we should remove all *potentially*
harmful possibilities from programming languages, I mean Perl *could*
be used by crackers to open up your system just like a sardine can -
(infact SATAN has elements written in Perl ). Are you saying that we
should ban assembler because a virus could be written in it ?
If people are crap programmers or plain malicious then thats how it is I'm
afraid but dont go trying to legislate how languages are going to be built
because of them otherwise we'd still be playing 'lunar lander'. On the
other hand we have highly developed languages that enable us to many of the
things that we can imagine and, hey !, if you'd spent some time looking
at the environment surrounding Perl for instance then you'd realise that
people actually care about the development of a language that they use
very day.
/J\
--
Jonathan Stowe <jns@btinternet.com>
Some of your questions answered:
<URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
------------------------------
Date: Sat, 09 Jan 1999 18:33:09 -0600
From: "Michael D. Schleif" <mds-resource@mediaone.net>
Subject: Re: Perl Criticism
Message-Id: <3697F545.AB555F83@mediaone.net>
Do you *really* mean this, verbatim?
topmind@technologist.com wrote:
>
> Being able to learn new stuff and being able to get new positions
> are too different things. I am a fast learner, but hireers
> judge one by PAID resume experience, not what is actually between
> your ears. My friends told me to outright lie. That was how
> THEY switched.
What you need is practical experience. *Neither* book learnin' nor
trolling is ever gonna make you no cash, buster.
Take it from me. I spent twenty (20) years in manufacturing, everyday
being tossed anew problem to solve, anew fire to put out. One day, they
tossed to me computer controlled manufacturing systems and I jumped at
the chance to learn something new. I spent every waking hour
scrambling, reading everything I could find on the subject, and trying
new things when opportunity arose. If you think that modern desktop
equipment is a challenge to program, goto Saturn manufacturing
facilities and look at millions of dollars of industrial controls doing
everything imaginable in *less than* 1MB RAM and same storage space!
The point is, if you are any good, you *will* find away to demonstrate
your talents to your bosses or prospective bosses! If you can't, you'd
better find something else that you want more, because it is *what you
do* within the confines and limitations of your environment that _is_
your performance. If you can't perform, go pump gas. Complaining about
Perl or any other language gets you nowhere and no friends. Do
something with Perl, participate in *fixing* it, build anew and better
language, or go pump gas. It is no difference to me, nor any skin off
my teeth }:-^
It really gets me, you young whipper-snappers, you go to school and get
a piece of paper that proclaims you are a computer scientist! Well,
gosh darnnit! do something with it, or use it to light a can of sterno
to keep you warm at night.
As I've said in previous posts, simply because you say that you are a
talented programmer *does not* make you one -- that _must_ be what you
do, not what you speak . . .
--
Best Regards,
mds
mds resource
888.250.3987
"Dare to fix things before they break . . . "
"Our capacity for understanding is inversely proportional to how much we
think we know. The more I know, the more I know I don't know . . . "
------------------------------
Date: Sat, 09 Jan 1999 18:35:12 -0600
From: Andrew Johnson <ajohnson@gatewest.net>
Subject: Re: Perl Criticism
Message-Id: <3697F5C0.7E30F36E@gatewest.net>
topmind@technologist.com wrote:
!
[snip]
! You have to consider the WHOLE environment of a language,
! NOT just its POTENTIAL under ideal conditions.
! The world is full of idiots and con-artists. Languages
! should take that into consideration.
Whatever makes you think it is the responsibility of language
designers to take idiots into consideration??? Think about it for a
minute --- Go ahead, design a language for idiots ... who do you
think will be using it?
regards
andrew
------------------------------
Date: Sun, 10 Jan 1999 01:03:37 GMT
From: topmind@technologist.com
Subject: Re: Perl Criticism
Message-Id: <778u99$a59$1@nnrp1.dejanews.com>
Reply to Jerome O'Neil's 1/7 message:
>> [I did NOT say Unix has *only* command lines.
You didn't?] What is this all about then: ... <<
I said the equivalent of "cat's have only one tail", but your interpretation
is that I said, "There are only cat's here".
I said that commands lines are only one line (which may wrap). This is not the
same as saying Unix has only command lines as interfaces. I was giving
attributes of command lines, NOT attributes of Unix interfaces in general when
I used the word "one".
Do you get it now? Or do you still want to play word trivia?
>> Example #2, for instance. I have written
mission critical military applications in sh. <<
Video games can be written in COBOL. But that does not prove anything.
(Perhaps I will move to China after hearing that the military let a firemouth
like you write software for them....The same people that put NT on
submarines.)
>> Pro: They are convenient and easily understood. That's a Good Thing. Con:
They are misunderstood by people with an obvious axe to grind and
a penchant for ignoring the documentation. <<
Their convenience is not that great, but their abusability is. The difference
between "=" and "==" can and does cause a zillion headaches, for example. I
don't see why you think they are so wonderful. 5% convenience improvement with
a 200% abusability increase.
Why are they so darn "convenient" and indespensable? I have not seen one
example of their indespensability.
You must never had to maintain OTHER'S code.
Lead in paint makes SLIGHTLY better paint, but that does not justify the
health risk.
>> You even offer a "prewhile()" construct as analternative. No pro's,
though. <<
The "pro" is that they DONT LEAK! Do you need something more explicit?
>> What you propose is a cute version of VisualBasic.
Been there, done that, it sucks. <<
That must be why it is more popular than Perl even though it costs money.
("better", not "cute".)
As a test of your articulateness, what was it exactly about VB that you did
not like?
Note that I would much rather maintain someone else's VB code than someone
else's Perl code. However, for my personal use, Perl is fine with me because I
am familiar with my own pattern of abuse.
Perl is like wine, except that the hangover is for the next guy!
-tmind-
http://www.geocities.com/SiliconValley/Lab/6888/langopts.htm
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Sat, 09 Jan 1999 18:21:38 -0800
From: TRG Software <chatmaster@c-zone.net>
Subject: Re: Perl Criticism
Message-Id: <36980EB2.13091326@c-zone.net>
I can only suggest to not bother with this moron. If it's not "one
thing" with him, then it's "another", all the while he doesn't have the
least bit of a grasp of the language! I mean, this is all about, how it
doesn't make enough sense to _him_ specifically, and he gets confused
and frustrated easily, so he ego is tarnished. Apparently he can't
handle not knowing everything he claims. He's a serious nut-job, and a
waste of time. I had thought at first, that he seemed like someone with
enough intellect to learn Perl enough to know what he's talking about,
rather then just hiding behind insults and confusing and bitching about
it without bothering to try. But I see now, as the thread goes to record
length, that he's simply reached his limit of understanding, and that's
what angers him. I.e., don't bother to waste your time, he doesn't know
who you are, or how much you know. If he knew who he was arguing with,
then he wouldn't reply in the way he has been to 90% of the people that
posted to him in this thread. :-)
Regards,
Tim...
Jonathan Stowe wrote:
>
> On Sat, 09 Jan 1999 22:08:32 GMT topmind@technologist.com wrote:
> > In article <777puv$ot$1@gellyfish.btinternet.com>,
> > Jonathan Stowe <gellyfish@btinternet.com> wrote:
> >> On Fri, 08 Jan 1999 18:13:46 GMT topmind@technologist.com wrote:
> >> >
> >> > The type of OS people work on depends mostly on circumstances
> >> > not controlled by them. Since it is tough to switch sub-specialties
> >> > in IT, most end up using what their college or first employer
> >> > used.
> >> >
> >>
> >> Infact as far as it goes I would suggest that a characteristic of a
> >> *good* programmer is an ability to adapt to circumstance as required -
> >> if this were not true then the dole queues would be full of people who
> >> had, shall we say, dBase III programming as their primary skill.
> >>
> >
> > Anyhow, you have not shown any triag mechanism that distributes
> > good programmers to Unix and the bad ones to Windows.
> >
>
> Nor did I assert that there was such a mechanism. As far as I can
> determine there are good programmers working on any platform that one might
> care to mention. For myself I have worked with AS/400,CP/M,DOS,Windows,
> VME,Unix what more can I say ? There is no such external mechanism but the
> individuals preferences and maybe the better programmers would prefer to
> work with an environment, Unix, that supports them better but I would
> doubt if many would assert this point too keenly.
>
> I have this feeling that you have been shafted in your work experience and
> now feel that you must take it out on the community of programmers - if I
> am correct then I would suggest that you seek the kind of professional
> help that this newsgroup is unable to offer.
>
> /J\
> od
> --
> Jonathan Stowe <jns@btinternet.com>
> Some of your questions answered:
> <URL:http://www.btinternet.com/~gellyfish/resources/wwwfaq.htm>
> Hastings: <URL:http://www.newhoo.com/Regional/UK/England/East_Sussex/Hastings>
--
Regards,
Tim Greer - chatmaster@c-zone.net
TRG Software and The Link Worm
http://www.linkworm.com
The Chat Base
http://www.chatbase.com
------------------------------------------------------------
* Creator of Paradise Chat, Chat Central & Spiral Chat
* Receiving over 250,000+ hits a day from users Worldwide!!!
* Sales of custom chat server scripts * CGI/Perl scripting
* Script trouble shooting/security * Modify & debug scripts
* Freelance Perl Scripting for any purpose or application
Copyright ) 1999 TRG Software and The Link Worm.
------------------------------
Date: Sun, 10 Jan 1999 02:37:08 GMT
From: "Jules" <julius@clara.net>
Subject: Perl modules compatibility, in UNIX and DOS.
Message-Id: <onUl2.4294$hs6.2993@nnrp2.clara.net>
Dear all, I've written this program that uses 2 modules of my own. It works
under CPAN Perl 5.00402 running on my Win95 PC. However when I run the
program in UNIX (Sun Solaris) which has Perl 5.003, it doesn't give me
correct output. I suspect is the way regular expressions work in Perl under
UNIX and DOS differ. Could it be that? Or could it be the difference in
version? I use lots of object stuff and regexp pattern matching for
recognising input data. I've tried running the script on other PCs which
have CPAN Perl5.00402 installed as well (either they're programmers
themselves or forced by me haah!!) What other kinda standard Perl
development tools (maybe ActivePerl?) I can download and try my program on
to make sure it is not compiler-dependent? Thanx.
Please help.
Thanx,
Jules
* There is not enough darkness to extinguish the light of a small candle *
------------------------------
Date: Sun, 10 Jan 1999 01:16:26 GMT
From: backslashxt@yahoo.com
Subject: Re: Perl within Perl
Message-Id: <778v1a$ap5$1@nnrp1.dejanews.com>
In article <3697D23C.6ABF927C@snailgem.org>,
Eugene Sotirescu <eugene@snailgem.org> wrote:
> backslashxt@yahoo.com wrote:
>
> > I have a script which displays a banner at the top of the page (rotating
> > banners) and it works fine. However, in a postcard script I'm working on, I
> > need to include the banner at the top of each page. But I can't seem to be
> > able to make the call to the banner script work when called from the
postcard
> > script, it only displays the tag to the HTML file.
> >
> > The call I'm using:
> > print "<!--\#exec cgi=\"/cgi-bin/topad.cgi\"--> \n"; (Calls banner)
> >
> > I've tried quite a few things here and there, and it always gets pasted as
> > html code. I've done it before where the topad.cgi would be loaded even when
> > called from another script but I don't remember how. Any help appreciated.
>
> Does the server you're working on support exec in SSIs?
>
>
Yes it does. Making the calls to both scripts works and SSI's work when called
from regular static webpages, but as soon as I try to call a perl from the
output of another perl, it doesn't do it. It just displays the call as html
code.
Any help appreciated as always.
Pat
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 9 Jan 1999 18:09:42 -0600
From: sf@sf.com (S.F.)
Subject: Remote File Information Gathering: Need Help
Message-Id: <3697efc6@news2.newsfeeds.com>
Hello...
I am interested in a solution regarding gathering information
on remote files. For example, on www.lameduck.com let's say
there is an index.html. Is there any way to see when this file was
last modified from a remote location, like from my website?
I am quite versed in Perl but obviously do have some gaps
in knowledge. Either a code snippet or a pointer to where
I can read the solution myself will fill one of those gaps.
Please respond to sardonia@sardonia.cihost.com
Thanks, Sean F.
-----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
http://www.newsfeeds.com/ The Largest Usenet Servers in the World!
-----------== Over 66,000 Groups, Plus a Dedicated Binaries Server ==----------
------------------------------
Date: Sat, 9 Jan 1999 19:04:08 -0500
From: phenix@interpath.com (John Moreno)
Subject: Re: Uploading PC files works - but not Mac files
Message-Id: <1dldols.hcqe5p1q14yf4N@roxboro0-013.dyn.interpath.net>
Charles R. Thompson <design@raincloud-studios.com> wrote:
> >I'm working on a project were we uploads files using a browser. I have
> >made a perl program which receives the files from the html form. All this
> >works perfect when dealing with PC files, but when uploading Mac files
> >the Resource Fork part is missing (a Mac file consist of a Resource Fork
> >and a Data Fork).
>
>
> I have no answer for you, but would like to ask something as I am doing
> something similar. Does this apply to ALL Mac files? For my script, they
> are only doing JPG and GIF uploads. I will eventually b e allowing
> multiple file formats, so this is probably (already) going to become an
> issue. About 75% of the people using my uploading script will be MAC
> based, so you have me freeeeekin out now.
Whether or not the resource fork is necessary (or even present) depends
upon the particular type of file being dealt with. For jpg and gif
files, everything is in the data fork so the point is moot, if you are
allowing the uploading of applications or other file formats that have
information that must be maintained in the resource fork, then the files
need to be turned into a simple stream of bytes, macbinary is a easy
format to create and deal with, it's 8-bit data so if that's a problem
you'd need to use uuencode or binhex or something, but unless you are
sending the files by mail that's probably not really a problem.
--
John Moreno
------------------------------
Date: 9 Jan 1999 23:11:15 GMT
From: ilya@math.ohio-state.edu (Ilya Zakharevich)
Subject: Re: Way to measure memory / performance hits of script?
Message-Id: <778nmj$fho$1@mathserv.mps.ohio-state.edu>
[A complimentary Cc of this posting was sent to Charles R. Thompson
<design@raincloud-studios.com>],
who wrote in article <778k6r$lir@bgtnsc03.worldnet.att.net>:
> With a current project, I've developed a script on a local network then
> moved the final project to the web only to find a serious performace
> degredation that I know will get me hell to pay.
>
> I've read about the benchmark module in the Camel book but am looking
> for information on how to 'gauge' the performance hit my scripts are
> going to generate. It's obvious it is slow...
perldoc perldebug
Hope this helps,
Ilya
------------------------------
Date: 9 Jan 1999 23:13:08 GMT
From: "Charles R. Thompson" <design@raincloud-studios.com>
Subject: Re: Way to measure memory / performance hits of script?
Message-Id: <778nq4$ach@bgtnsc03.worldnet.att.net>
Ilya Zakharevich wrote in message
<778nmj$fho$1@mathserv.mps.ohio-state.edu>...
>> With a current project, I've developed a script on a local network
then
>> moved the final project to the web only to find a serious performace
>> degredation that I know will get me hell to pay.
>
>perldoc perldebug
Thanks.
CT
------------------------------
Date: Sat, 9 Jan 1999 23:40:23 -0000
From: "Martin Harrigan" <harrigan@mailexcite.com>
Subject: Why doesn't it work?
Message-Id: <778p9v$dqs$1@news2.news.iol.ie>
I'm trying to write a perl script to redirect a user to a page based on the
argument after the ?. Can anyone tell me where I'm going wrong?
#!/usr/local/bin/perl
# Ex. http://www.domain.com/scripts/redirect.pl?url=index
# will bring the user to the index page.
$url = param('url');
if ($url == "index") {
print "Location: http://www.domain.com/user/index.html";
}
elsif ($url == "help") {
print "Location: http://www.domain.com/user/help.html";
}
else {
print "Location: http://www.domain.com/user/error.html";
}
------------------------------
Date: Sun, 10 Jan 1999 00:44:22 GMT
From: alastair@calliope.demon.co.uk (Alastair)
Subject: Re: Why doesn't it work?
Message-Id: <slrn79fu02.6h.alastair@calliope.demon.co.uk>
Martin Harrigan <harrigan@mailexcite.com> wrote:
>I'm trying to write a perl script to redirect a user to a page based on the
>argument after the ?. Can anyone tell me where I'm going wrong?
>
>if ($url == "index") {
Perhaps ;
if ($url eq "index") {
...
is better!
HTH.
--
Alastair
work : alastair@psoft.co.uk
home : alastair@calliope.demon.co.uk
------------------------------
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 4608
**************************************
