[16241] in Perl-Users-Digest
Perl-Users Digest, Issue: 3653 Volume: 9
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Jul 13 14:10:42 2000
Date: Thu, 13 Jul 2000 11:10:30 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Message-Id: <963511830-v9-i3653@ruby.oce.orst.edu>
Content-Type: text
Perl-Users Digest Thu, 13 Jul 2000 Volume: 9 Number: 3653
Today's topics:
Re: HELP: Bizarre BEGIN block problem <franl-removethis@world.omitthis.std.com>
how 2 run CGI scripts on NT 4 hqcu@yahoo.com
Re: how to capture the message return from the system() (Helgi Briem)
Re: Interesting article on Perl security <jraff@home.com>
Re: Interesting article on Perl security <jraff@home.com>
Re: Interesting article on Perl security <care227@attglobal.net>
Re: Jeopardy Style (Again!) [Was: multidimensional asso <jeffrey.l.susanj@boeing.com>
Re: Jeopardy Style (Again!) [Was: multidimensional asso <care227@attglobal.net>
libnet installation error in Windows98 <maurice.maltbia@intel.com>
Re: looking for ntp example please (Will England)
LWP : How do you request when you have a document to PO shaikhr@my-deja.com
Re: Making a Perl module (Tad McClellan)
Re: Making a Perl module <care227@attglobal.net>
Re: Making a Perl module <samara_biz@hotmail.com>
Re: Making a Perl module <samara_biz@hotmail.com>
Re: Making a Perl module <bart.lateur@skynet.be>
Re: New to perl, need help (Greg Snow)
Re: operator lt (M.J.T. Guy)
Perl -> HTML on the fly? chrisconrad8479@my-deja.com
Re: perl 5.005_03 on Linux fails lib/ipc_sysv.t test (M.J.T. Guy)
Re: perl 5.005_03 on Linux fails lib/ipc_sysv.t test (M.J.T. Guy)
Perl and serial port communications <daystrom@trakonic.com>
Re: Perl and serial port communications <jraff@home.com>
perl beautifier? <DNess@Home.Com>
Re: perl beautifier? (Randal L. Schwartz)
Re: perl beautifier? <pap@sotonians.org.uk>
Re: perl beautifier? (Malcolm Dew-Jones)
Perl debugger ?? <e.bras@hccnet.nl>
Re: Perl debugger ?? (Tad McClellan)
Re: Perl debugger ?? <mjcarman@home.com>
Re: perl vs python <bart.lateur@skynet.be>
Digest Administrivia (Last modified: 16 Sep 99) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 13 Jul 2000 17:28:04 GMT
From: Francis Litterio <franl-removethis@world.omitthis.std.com>
Subject: Re: HELP: Bizarre BEGIN block problem
Message-Id: <m3hf9ulz2z.fsf@franl.andover.net>
"Ed Foy" <ed@nospam.com> writes:
> #!/usr/local/bin/perl5
>
> require 5.004;
>
> BEGIN {
> print "Content-type: text/html\n\n";
> open (STDERR, ">&STDOUT") or die "Cannot Redirect STDERR: $!";
> }
>
> my $Dummy = "";
> exit;
>
> The above code results in the following error message on compilation:
>
> TEST.PL contains syntax errors.
> Content-type: text/html\n\n
>
> For some reason the "Content-type: text/html\n\n" is a problem.
Well, the above script runs fine for me in Perl 5.005_03. But if I
purposely insert a syntax error at the very bottom of the script (i.e., I
change "exit;" to ",exit;"), I get:
syntax error at ./zzz line 11, near ","
Execution of ./zzz aborted due to compilation errors.
Content-type: text/html
The "Content-type: text/html" appears because BEGIN blocks execute at
compile-time not at run time, so the code in them runs even if your
script has syntax errors that prevent the script from starting.
--
Francis Litterio
franl-removethis@world.std.omit-this.com
PGP public keys available on keyservers.
------------------------------
Date: Thu, 13 Jul 2000 17:45:00 GMT
From: hqcu@yahoo.com
Subject: how 2 run CGI scripts on NT 4
Message-Id: <8kkv6o$okl$1@nnrp1.deja.com>
Hi,
CGI scripts are all over the place, but how can I get them to run on
Windows NT?
I've installed MS Personal Web Server and Perl on a NT machine, placed
the cgi scripts in d:\inetpub\wwwroot\cgi-bin, the html page in
d:\inetpub\wwwroot, and Perl still doesn't interpret the scripts.
MS PWS doens't give much help for Perl scripts (but does a great job
pushing the ASP wares), and searches on the net just helped confuse
things more.
I'd really appreciate any -emailed- pointer (Environment variable,
other directory???)
Thanks.
Matt
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 13 Jul 2000 16:43:47 GMT
From: helgi@NOSPAMdecode.is (Helgi Briem)
Subject: Re: how to capture the message return from the system()
Message-Id: <396df0d1.190732789@news.itn.is>
On Thu, 13 Jul 2000 10:00:53 +0800, "Lucas Gump"
<lucas@cplhk.com> wrote:
>As title.
>Thanks
>
What's a message return?
If you want to capture the output from an
external program the usual way is either
with backticks:
$out = `program`;
or with qx:
$out = qx/program/;
If you want to capture the return code
you can use:
$error = system ("program");
This will be 0 if the program returned
successfully, otherwise something else.
Have fun.
Helgi
------------------------------
Date: Thu, 13 Jul 2000 17:44:13 GMT
From: "jraff" <jraff@home.com>
Subject: Re: Interesting article on Perl security
Message-Id: <Ndnb5.64205$lU5.427939@news1.rdc1.nj.home.com>
Any idea what language that is?
--------------------------------------
"Drew Simonis" <care227@attglobal.net> wrote in message
news:396DD91D.44F46A3A@attglobal.net...
> A pretty interesting treatment of our favorite language. Most of the
> info should be old hat to you guru's, but I think it helps to stress
> the point of secure programming style.
>
> This is a black hat hacker site, so if your company has problems with
> you visiting this sort of thing, be forewarned!
>
>
http://www.phreedom.org/en/issues/Phm23%20-%20Jordan%20Dimov%20-%20Security%
20Issues%20in%20Perl%20Scripts.txt
------------------------------
Date: Thu, 13 Jul 2000 17:51:43 GMT
From: "jraff" <jraff@home.com>
Subject: Re: Interesting article on Perl security
Message-Id: <Pknb5.64206$lU5.427904@news1.rdc1.nj.home.com>
For English readers;
http://www.phreedom.org/en/frames.html
------------------------------------------------
"Drew Simonis" <care227@attglobal.net> wrote in message
news:396DD91D.44F46A3A@attglobal.net...
> A pretty interesting treatment of our favorite language. Most of the
> info should be old hat to you guru's, but I think it helps to stress
> the point of secure programming style.
>
> This is a black hat hacker site, so if your company has problems with
> you visiting this sort of thing, be forewarned!
>
>
http://www.phreedom.org/en/issues/Phm23%20-%20Jordan%20Dimov%20-%20Security%
20Issues%20in%20Perl%20Scripts.txt
------------------------------
Date: Thu, 13 Jul 2000 13:53:21 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Interesting article on Perl security
Message-Id: <396E0211.1284A350@attglobal.net>
jraff wrote:
>
> For English readers;
> http://www.phreedom.org/en/frames.html
I shows up in Bulgarian on your PC? Shite. Sorry.
------------------------------
Date: Thu, 13 Jul 2000 16:55:24 GMT
From: "Jeff Susanj" <jeffrey.l.susanj@boeing.com>
Subject: Re: Jeopardy Style (Again!) [Was: multidimensional associative arrays]
Message-Id: <FxnB0G.Mqz@news.boeing.com>
Jon Bell wrote in message ...
>In article <396C85F7.45D24FA7@Home.Com>, David Ness <DNess@Home.Com>
wrote:
>>
>>So when you quote text of previous messages, put your comments after the
[snip]
>
>--
I do admit that some standards are helpful. But, we must remember that this
is a community and people stopping by will judge the community by first
impressions. If a guy violates the standards and someone jumps all over him
then he feels unwelcome in the community. It's not that he shouldn't be
told but that he needs to be told with tact. Often I will read a new
newsgroup for some time before I post just to get a feel for what the
standards are. It still doesn't keep me out of trouble as I did not see
immediately that people weren't generally using Jeopardy style quoting. You
may notice I have changed my ways, at least until I forget.
Jeff S.
------------------------------
Date: Thu, 13 Jul 2000 13:38:08 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Jeopardy Style (Again!) [Was: multidimensional associative arrays]
Message-Id: <396DFE80.7F16F648@attglobal.net>
Jeff Susanj wrote:
>
> I do admit that some standards are helpful. But, we must remember that this
> is a community and people stopping by will judge the community by first
> impressions. If a guy violates the standards and someone jumps all over him
> then he feels unwelcome in the community.
It is kinda a Usenet tradition to "lurk" in a NG before posting.
It is generally a Bad Thing to jump right in and post without
getting a feel for the atmosphere. Its akin to going to a public
pool in a new town and swimming nude. It may be OK in your home
town, but the folks in this villiage don't appreciate your exhibition.
> It's not that he shouldn't be
> told but that he needs to be told with tact.
After mentioning it a few dozen times, tact gets pushed out of the
way by laziness and the tendency to be annoyed. Or, using myself as
an example, some people totally lack tact. I don't mean to sound
rude, but many people have responded to me that I did indeed come
off sounding exactly that.
> Often I will read a new
> newsgroup for some time before I post just to get a feel for what the
> standards are. It still doesn't keep me out of trouble as I did not see
> immediately that people weren't generally using Jeopardy style quoting.
Must not have spent that much time then, eh? =) (I include a smiley
so you don't join the side that may think I'm a prick)
------------------------------
Date: Thu, 13 Jul 2000 10:04:14 -0700
From: "MM" <maurice.maltbia@intel.com>
Subject: libnet installation error in Windows98
Message-Id: <8kksr5$cls@news.or.intel.com>
I have received the following errors and would like you help with installing
the "libnet" module in Windows98:
syntax error at C:/Perl/site/lib/Net/Config.pm line 70, near ">"
Compilation failed in require at C:/Perl/site/lib/Net/FTP.pm line 21.
BEGIN failed--compilation aborted at C:/Perl/site/lib/Net/FTP.pm line 21.
Compilation failed in require at c:\perl\bin\getdlog.pl line 12.
BEGIN failed--compilation aborted at c:\perl\bin\getdlog.pl line 12.
---
I have Activestate Perl version 5.6.0 installed.
Thanks in advance!
maurice.maltbia@intel.com
------------------------------
Date: Thu, 13 Jul 2000 15:08:58 GMT
From: will@mylanders.com (Will England)
Subject: Re: looking for ntp example please
Message-Id: <slrn8mrmvn.cam.will@mylanders.com>
On Thu, 13 Jul 2000 13:32:59 +1000, Robert Chalmers
<robert@chalmers.com.au> wrote:
>I'm looking for examples of using ntp to fetch the time from servers. Or
>indeed is this possible?
1) yes.
2) comp.protocols.ntp is --> that-a-way.
3) RFC 1305 defines the current version and behaviors
of NTP.
But, you are right -- there's not much perl code that I found
in a 45-second search dealing with NTP.
Once you get things figured out, post back with samples. I
bet more that just you have wondered about this.
Will
--
"If Al Gore invented the Internet, then I invented spellcheck!"
Dan Quayle, quoted at the National Press Club, 8/3/1999
pgpkey at http://will.mylanders.com/pub_pgp.asc
Recovery page: http://will.mylanders.com/ will@mylanders.com
------------------------------
Date: Thu, 13 Jul 2000 16:56:03 GMT
From: shaikhr@my-deja.com
Subject: LWP : How do you request when you have a document to POST?
Message-Id: <8kksb4$id1$1@nnrp2.deja.com>
Hey PERL gurus, your help. will be much appreciated.
I was trying to use the LWP:UserAgent module to sent in a request.
but I don't know how to sent in a document along with my request?
e.g.
require LWP::UserAgent; $ua = new LWP::UserAgent; $request = new
HTTP::Request('POST', 'file://localhost/etc/motd'); $response =
$ua->request($request); /\ | | Is there any parameter I set to send the
document?
LWP : How do you request when you have a document to POST?
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: Thu, 13 Jul 2000 09:59:50 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Making a Perl module
Message-Id: <slrn8mriqm.agg.tadmc@magna.metronet.com>
On Thu, 13 Jul 2000 10:00:42 -0400, Alex T. <samara_biz@hotmail.com> wrote:
>How do I make a module in Perl?
> @EXPORT = qw(funcOne funcTwo);
^^^
>sub funcTwp{...}
^^^
>I tried something like that,
^^^^^^^^^
Not close enough to whatever it was that you really tried, it appears.
>but it didn't work.
What's that mean?
Get any messages? (messages are meant to help with debugging, so you
should include them if you want debugging help)
Get any output that indicates "didn't workness"?
( if so, what did you get, and what did you want to get? )
>So I'm wondering if I'm
>missing something.
So are we.
We are missing the code that you tried.
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Thu, 13 Jul 2000 11:09:35 -0400
From: Drew Simonis <care227@attglobal.net>
Subject: Re: Making a Perl module
Message-Id: <396DDBAF.F8A42387@attglobal.net>
Tad McClellan wrote:
>
> Get any messages? (messages are meant to help with debugging, so you
> should include them if you want debugging help)
>
> Get any output that indicates "didn't workness"?
^^^^^^^^^^^^^^^
Thats going right into my vocabulary!
------------------------------
Date: Thu, 13 Jul 2000 11:45:46 -0400
From: "Alex T." <samara_biz@hotmail.com>
Subject: Re: Making a Perl module
Message-Id: <396DE42A.23A97775@hotmail.com>
brian d foy wrote:
> start with h2xs and the perl man pages on module creation. :)
>
> --
> brian d foy
> CGI Meta FAQ <URL:http://www.smithrenaud.com/public/CGI_MetaFAQ.html>
> Perl Mongers <URL:http://www.perl.org/>
Are you saying I can use h2xs for changing the environment variable @INC?
I work in Windows NT using IIS 4.0.
I looked at h2xs, but still don't understand how to add 'C:\Perl\Mymodules' to @INC
I just started with Perl a little bit ago, and I have no idea what rpcsvc/rusers stands
for.
If you could just give me a simple example on how to change @INC, I would really
appriciate it.
Alex
------------------------------
Date: Thu, 13 Jul 2000 11:53:56 -0400
From: "Alex T." <samara_biz@hotmail.com>
Subject: Re: Making a Perl module
Message-Id: <396DE614.431454A5@hotmail.com>
Hi,
Yeah, I guess I should have better described what was the problem. Or try to
use perldoc on modules, before I asked. Thanks for reply though!
I have another question. I'm using IIS 4.0 ASP objects, such as $Response and
$Server. I tried create a module with just one function, which uses those
objects. When I run my script, I get the following error:
Global symbol "$Response" requires explicit package name at
C:/Perl/site/lib/Aspfunctions.pm. Global symbol "$Server" requires explicit
package name at C:/Perl/site/lib/Aspfunctions.pm line 31. Global symbol
"%Replacements" requires explicit package name at
C:/Perl/site/lib/Aspfunctions.pm line 35. Global symbol "%Replacements"
requires explicit package name at C:/Perl/site/lib/Aspfunctions.pm line 36.
Global symbol "$Response" requires explicit package name at
C:/Perl/site/lib/Aspfunctions.pm line 38. Compilation failed in require line 8.
BEGIN failed--compilation aborted at (eval 10) line 8.
/admin.asp, line 41
As I understand, I get this error, because the module doesn't know where
$Response and $Server come from. So how do I make my module understand that
those are the ASP objects?
Thanks for your help!
Alex
Tad McClellan wrote:
> On Thu, 13 Jul 2000 10:00:42 -0400, Alex T. <samara_biz@hotmail.com> wrote:
>
> >How do I make a module in Perl?
>
> > @EXPORT = qw(funcOne funcTwo);
> ^^^
> >sub funcTwp{...}
> ^^^
>
> >I tried something like that,
> ^^^^^^^^^
>
> Not close enough to whatever it was that you really tried, it appears.
>
> >but it didn't work.
>
> What's that mean?
>
> Get any messages? (messages are meant to help with debugging, so you
> should include them if you want debugging help)
>
> Get any output that indicates "didn't workness"?
> ( if so, what did you get, and what did you want to get? )
>
> >So I'm wondering if I'm
> >missing something.
>
> So are we.
>
> We are missing the code that you tried.
>
> --
> Tad McClellan SGML Consulting
> tadmc@metronet.com Perl programming
> Fort Worth, Texas
------------------------------
Date: Thu, 13 Jul 2000 19:22:15 +0200
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: Making a Perl module
Message-Id: <raurmscri9jcka8jrp9s65a6r9g3hiknr3@4ax.com>
Alex T. wrote:
>If you could just give me a simple example on how to change @INC, I would really
>appriciate it.
use lib "/add/this/path/to/inc";
--
Bart.
------------------------------
Date: 13 Jul 2000 16:10:11 GMT
From: snow@statsci.com (Greg Snow)
Subject: Re: New to perl, need help
Message-Id: <8kkpl3$m27$1@junior.statsci.com>
In article <x73dlfku11.fsf@home.sysarch.com>,
Uri Guttman <uri@sysarch.com> wrote:
>>>>>> "TW" == The WebDragon <nospam@nospam.com> writes:
[snip]
> TW> pshew.. works, but gets darned slow around 25 and up -- anyone
> TW> know of any slick ways to make this sort of thing run faster?
> TW> (just out of curiosity -- I've seen you guys turn some complex
> TW> pieces of code into around 15 chars :)
>
>unroll it into a loop. fib is easy to define in both recursive and loop
>ways but the loop one is much faster.
[snip]
If your going for speed, then the following probably deserves
consideration:
#!/usr/bin/perl -w
use strict;
use constant PHI => (1+sqrt(5))/2;
use constant PHIH => 1-(PHI);
use constant MULT => 1/sqrt(5);
sub fib {
sprintf "%.0f", MULT * ( PHI**$_[0] - PHIH**$_[0]);
}
for my $i (0..100) {
print fib($i),"\n";
}
(see http://ulcar.uml.edu/~iag/CS/Fibonacci.html )
--
-------------------------------------------------------------------------------
Gregory L. Snow | Inertia makes the world go round,
(Greg) | Love makes the trip worth taking.
gsnow@splus.mathsoft.com |
------------------------------
Date: 13 Jul 2000 16:47:05 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: operator lt
Message-Id: <8kkrq9$flt$1@pegasus.csx.cam.ac.uk>
brian d foy <brian@smithrenaud.com> wrote:
>In article <8k5fiq$bek$1@schbbs.mot.com>, "Michael Simanek" <simanek@uiuc.edu> posted:
>
>> When using the string operator 'lt' (less than) does this compare by
>> alphabetic [order] value or by total ascii value or what? Can I use this
>> for an alphabetizing algorithm? Thanks in advance.
>
>it compares strings ASCIIbetically, as documented. that is, it does not
>compare them alphabetically.
It compares them according to the locale. Only for the default
'C' locale will you (necessarily) get ASCIIbetic ordering.
Of course, the 'C' locale means "most of the time on most systems".
Mike Guy
------------------------------
Date: Thu, 13 Jul 2000 15:38:38 GMT
From: chrisconrad8479@my-deja.com
Subject: Perl -> HTML on the fly?
Message-Id: <8kknpr$ija$1@nnrp1.deja.com>
Hello everybody. I am in need of some help regarding developing on the
fly web pages. I would like a user to be able to come into my site,
login, and establish a website by selecting options such as background,
clipart, and message. With these inputs, I want the HTML to be
automatically generated and saved. This is the barebones description,
but I think you guys know what I am trying to do.
Has anyone done this or know any resources that you can point me to?
Thanks in advance.
Christopher Conrad
Sent via Deja.com http://www.deja.com/
Before you buy.
------------------------------
Date: 13 Jul 2000 15:59:44 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: perl 5.005_03 on Linux fails lib/ipc_sysv.t test
Message-Id: <8kkp1g$dj0$1@pegasus.csx.cam.ac.uk>
In article <WQg95.1549$iP2.149913@news.dircon.co.uk>,
Jonathan Stowe <gellyfish@gellyfish.com> wrote:
>On Thu, 06 Jul 2000 23:41:39 GMT, Mark Post Wrote:
>> I am trying to build perl 5.005_03 on Linux. The compiles all complete
>> successfully, but when I do the 'make test,' the ipc_sysv.t test fails.
>> When I run the test harness, it says that tests 5 and 6 are failing.
>>
>> I ran a number of Deja searches, and couldn't find anything that would
>> indicate this is an acceptable result. There wasn't anything in the FAQ
>> that dealt with this level of detail.
>>
>> What are tests 5 and 6 actually testing? Are these important functions?
>> (I have to believe so, but I just don't know enough about perl.) What
>> can I do to get more information as to why these tests might be failing,
>> and what I might need to do to fix them?
>
>
>You probably have a kernel that hasnt got SysV IPC support compiled in -
>you should reconfigure and rebuild your kernel and try again in the first
>instance ....
But Configure should work that out and Do The Right Thing.
Mike Guy
------------------------------
Date: 13 Jul 2000 16:06:40 GMT
From: mjtg@cus.cam.ac.uk (M.J.T. Guy)
Subject: Re: perl 5.005_03 on Linux fails lib/ipc_sysv.t test
Message-Id: <8kkpeg$dpu$1@pegasus.csx.cam.ac.uk>
Mark Post <mark.post@eds.com> wrote:
>I am trying to build perl 5.005_03 on Linux. The compiles all complete
>successfully, but when I do the 'make test,' the ipc_sysv.t test fails.
>When I run the test harness, it says that tests 5 and 6 are failing.
>
>What are tests 5 and 6 actually testing? Are these important functions?
>(I have to believe so, but I just don't know enough about perl.) What
>can I do to get more information as to why these tests might be failing,
>and what I might need to do to fix them?
Look at the source of the test in t/lib/ipc_sysv.t . I note there
are various block comments in this test which may be relevant.
And you can also try stepping through the test with the debugger to
see exactly what is failing:
./perl -Ilib -d t/lib/ipc_sysv.t
And as to importance, it probably doesn't matter unless you are
planning to use the IPC::SysV module.
Mike Guy
------------------------------
Date: Thu, 13 Jul 2000 13:09:38 -0300
From: "Raymond Mroz" <daystrom@trakonic.com>
Subject: Perl and serial port communications
Message-Id: <eSlb5.28027$qS3.59801@tor-nn1.netcom.ca>
I was wondering if anyone could point me to information (web or elsewhere)
on using Perl to communicate via a serial port.
Thanks in advance for any replies.
Ray
------------------------------
Date: Thu, 13 Jul 2000 17:03:51 GMT
From: "jraff" <jraff@home.com>
Subject: Re: Perl and serial port communications
Message-Id: <XDmb5.64194$lU5.427706@news1.rdc1.nj.home.com>
One should look on CPAN before one asks.
http://search.cpan.org/search?dist=Device-SerialPort
http://search.cpan.org/search?dist=SerialPort
http://search.cpan.org/search?dist=Win32-SerialPort
---------------------------------------------------------
"Raymond Mroz" <daystrom@trakonic.com> wrote in message
news:eSlb5.28027$qS3.59801@tor-nn1.netcom.ca...
> I was wondering if anyone could point me to information (web or elsewhere)
> on using Perl to communicate via a serial port.
>
> Thanks in advance for any replies.
>
> Ray
>
>
------------------------------
Date: Thu, 13 Jul 2000 17:02:33 GMT
From: David Ness <DNess@Home.Com>
Subject: perl beautifier?
Message-Id: <396DF629.DDF08985@Home.Com>
I have searched (at least Alta Vista and Google) for `perl beautifiers',
and so far have only found programs written in perl that beautify other
things (C/C++, Java, ...). Are any perl beautifers that beautify perl
available?
------------------------------
Date: 13 Jul 2000 10:11:34 -0700
From: merlyn@stonehenge.com (Randal L. Schwartz)
Subject: Re: perl beautifier?
Message-Id: <m1puoilzuh.fsf@halfdome.holdit.com>
>>>>> "David" == David Ness <DNess@Home.Com> writes:
David> I have searched (at least Alta Vista and Google) for `perl beautifiers',
David> and so far have only found programs written in perl that beautify other
David> things (C/C++, Java, ...). Are any perl beautifers that beautify perl
David> available?
Doesn't the FAQ say something like "Perl resists all attempts to be
beautified..."?
If not, it should. :)
Having said that, I don't know of any standalone program, but Emacs
has cperl-mode (written by the illustrious Ilya, author of most of the
Perl regex code and much of the Perl debugger) that seems to do a
decent job of indenting.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
------------------------------
Date: Thu, 13 Jul 2000 18:41:34 +0000
From: "Paul Taylor" <pap@sotonians.org.uk>
Subject: Re: perl beautifier?
Message-Id: <8enb5.89$Ki2.11009@nnrp4.clara.net>
> Having said that, I don't know of any standalone program, but Emacs has
> cperl-mode (written by the illustrious Ilya, author of most of the Perl
> regex code and much of the Perl debugger) that seems to do a decent job
> of indenting.
It's reasonably cool if you're happy to use "book-friendly"
left-curly-brace-at end-of-line syntax.
i.e.
sub smashing {
...
}
Misbehaves a little if you're a brace-on-its-own-line merchant. It
tabs the opening brace out too far.
i.e.
sub smashing
{
...
}
becomes ...
sub smashing
{
...
}
P.
------------------------------
Date: 13 Jul 2000 10:59:00 -0800
From: yf110@vtn1.victoria.tc.ca (Malcolm Dew-Jones)
Subject: Re: perl beautifier?
Message-Id: <396e0364@news.victoria.tc.ca>
David Ness (DNess@Home.Com) wrote:
: I have searched (at least Alta Vista and Google) for `perl beautifiers',
: and so far have only found programs written in perl that beautify other
: things (C/C++, Java, ...). Are any perl beautifers that beautify perl
: available?
Whether this is a beautifier or not depends on how ugly the original code
is, plus it loses comments.
perldoc B::Deparse
perl -MO=Deparse your_script.pl
------------------------------
Date: Thu, 13 Jul 2000 15:48:50 +0200
From: "Ed Bras" <e.bras@hccnet.nl>
Subject: Perl debugger ??
Message-Id: <8kkham$s0k$1@enterprise.cistron.net>
Where can I find a perl debugger for version 5.005 ?
www.activestate.com says it is comming out with one, but this is only for
win, which I don't LIKE.
Some advice on this topic please,
Ed Bras
------------------------------
Date: Thu, 13 Jul 2000 11:15:27 -0400
From: tadmc@metronet.com (Tad McClellan)
Subject: Re: Perl debugger ??
Message-Id: <slrn8mrn8f.b00.tadmc@magna.metronet.com>
On Thu, 13 Jul 2000 15:48:50 +0200, Ed Bras <e.bras@hccnet.nl> wrote:
>Where can I find a perl debugger for version 5.005 ?
perldoc perldebug
--
Tad McClellan SGML Consulting
tadmc@metronet.com Perl programming
Fort Worth, Texas
------------------------------
Date: Thu, 13 Jul 2000 11:11:50 -0500
From: Michael Carman <mjcarman@home.com>
Subject: Re: Perl debugger ??
Message-Id: <396DEA46.478BCDB7@home.com>
Ed Bras wrote:
>
> Where can I find a perl debugger for version 5.005 ?
>
Is the standard debugger (perl -d <scriptname>) not meeting your needs?
If you want a GUI, try the Tk debugger. Seach CPAN for "ptkdb".
-mjc
------------------------------
Date: Thu, 13 Jul 2000 17:54:14 +0200
From: Bart Lateur <bart.lateur@skynet.be>
Subject: Re: perl vs python
Message-Id: <5fprmsotfdiesp7kcjkr2eatl9v52br79q@4ax.com>
arun_rajappa@my-deja.com wrote:
>if you are writing an huge (read over 10000 lines of code) application
>which will need to be maintained over the next 5 years, use Python.
Er... what language?
If you'd write a program of, say, 12000 lines in Python, it is well
possible that the equivalent code in Perl would be only 8000 lines. So,
is that over or under 10000 lines?
--
Bart.
------------------------------
Date: 16 Sep 99 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 16 Sep 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.
| NOTE: The mail to news gateway, and thus the ability to submit articles
| through this service to the newsgroup, has been removed. I do not have
| time to individually vet each article to make sure that someone isn't
| abusing the service, and I no longer have any desire to waste my time
| dealing with the campus admins when some fool complains to them about an
| article that has come through the gateway instead of complaining
| to the source.
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.
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 3653
**************************************
