[9549] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 3143 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon Jul 13 17:07:24 1998

Date: Mon, 13 Jul 98 14:00:28 -0700
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)

Perl-Users Digest           Mon, 13 Jul 1998     Volume: 8 Number: 3143

Today's topics:
        Arguments in SUB <avias@dialup.ptt.ru>
    Re: Arguments in SUB (brian d foy)
        arrays and pattern matching <nwyman@mda.ca>
    Re: Changing filename automatically with perl Grehom@my-dejanews.com
    Re: Code for deciding week number? <sapapo@tukki.cc.jyu.fi>
    Re: compare MS Word files <fecund@fatnet.net>
    Re: Deutsche Boerse sucht 100 neue Mitarbeiter im IT-Be <flavell@mail.cern.ch>
    Re: First meeting of Dallas.pm (brian d foy)
        Forcing DOS window to stay open willwebber@my-dejanews.com
    Re: Forcing DOS window to stay open (Bob Trieger)
    Re: Getting Yesterday's Date (Bernie Cosell)
    Re: I am an "antispam spammer"? (John Oliver)
    Re: I am an "antispam spammer"? (Jordyn A. Buchanan)
    Re: Lenght of string ... newbie eats humble pie! Grehom@my-dejanews.com
        Merging files <b-camp@students.uiuc.edu>
    Re: My script stops searching... Grehom@my-dejanews.com
    Re: new charter and moderator for comp.lang.perl.announ (Ben Coleman)
    Re: page is not showing until perl program is finished (brian d foy)
    Re: Parsing Perl (Stephen McCamant)
    Re: Parsing Perl <tchrist@mox.perl.com>
    Re: Perl Beautifier Home Page (brian d foy)
        Perl Development Enviornments <johnc@interactive.ibm.com>
    Re: Perl-HTML not interpreted (Too much MP)
    Re: Putting CPAN on a CD: good or not good? (brian d foy)
        Special: Digest Administrivia (Last modified: 12 Mar 98 (Perl-Users-Digest Admin)

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

Date: Mon, 13 Jul 1998 13:28:11 +0400
From: "avias" <avias@dialup.ptt.ru>
Subject: Arguments in SUB
Message-Id: <35a9d2b6.0@news.ptt.ru>

Hi!

I have a problem with subj.

here's my code:
#####
$arr = \@standartArr;
##### cutted some space

$temp = mysearchArr(???); # I want to give $arr to sub

sub mysearchArr
    {
            return $_[0]->[0];
    }

 What should  I write instead '???' ?






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

Date: Mon, 13 Jul 1998 16:11:08 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Arguments in SUB
Message-Id: <comdog-ya02408000R1307981611080001@news.panix.com>
Keywords: from just another new york perl hacker

In article <35a9d2b6.0@news.ptt.ru>, "avias" <avias@dialup.ptt.ru> posted:

>Hi!
>
>I have a problem with subj.
>
>here's my code:
>#####
>$arr = \@standartArr;
>##### cutted some space
>
>$temp = mysearchArr(???); # I want to give $arr to sub
>
>sub mysearchArr
>    {
>            return $_[0]->[0];
>    }
>
> What should  I write instead '???' ?

$arr would work since it's a reference to an array.

      $temp = mysearchArr($arr);

you might also try

      $temp = mysearchArr(\@standartArr);

or
 
      $temp = mysearchArr([ 3, 2, 1]);

good luck :)

-- 
brian d foy                                  <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>


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

Date: Mon, 13 Jul 1998 10:28:22 -0700
From: Naomi Wyman <nwyman@mda.ca>
Subject: arrays and pattern matching
Message-Id: <35AA43B6.4800C566@mda.ca>

I am trying to match a pattern based on values in an array, which are
all strings. I'm thinking using something like: /(\b[@Types]+\b)\s+/i).
For the data I have this seems to work just fine, but I'm concerned that
I may be missing something and on other strings this will fail. So my
question is: Does this really match the entire string or just parts of
it? And does anyone have any better suggestions.

Thanks,
Naomi



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

Date: Mon, 13 Jul 1998 19:02:27 GMT
From: Grehom@my-dejanews.com
Subject: Re: Changing filename automatically with perl
Message-Id: <6odlk3$5jf$1@nnrp1.dejanews.com>

Thanks Tad - I'm still getting to grips with Perl and examples like that help
a great deal more than some replies posted!

In article <5kvao6.uj2.ln@localhost>,
  tadmc@flash.net (Tad McClellan) wrote:
> jevon@my-dejanews.com wrote:
>
> : In my script I am outputting individual files. I want them to be named
> : game1.gme, game2.gme etc...
>
> : I want to know how to read in what the last file is (ie. Largest number) and
> : then add one (1) to it..
>
> --------------------------
> #!/usr/bin/perl -w
>
> use strict;
>
> my $next_file = nextFileName();
> print "The next file should be named '$next_file'\n";
>
> sub nextFileName {
>    my($largest) = 0;
>
>    opendir(DIR, '.') || die "could not open current directory  $!";
>
>    foreach my $num ( grep s/^game(.*)\.gme$/$1/, readdir(DIR)) {
>       $largest = $num if $num > $largest;
>    }
>
>    closedir(DIR);
>
>    return sprintf "game%d.gme", $largest+1;
> }
> --------------------------
>
> --
>     Tad McClellan                          SGML Consulting
>     tadmc@metronet.com                     Perl programming
>     Fort Worth, Texas
>

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum


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

Date: 13 Jul 1998 21:34:11 +0300
From: "Sami P. Poikonen" <sapapo@tukki.cc.jyu.fi>
Subject: Re: Code for deciding week number?
Message-Id: <6odjv3$8lf@tukki.cc.jyu.fi>

- <root.noharvest.\@not_even\here.com> wrote:
: Thomas Albech <thomas@provideo.dk> Said this:
: >How do you mathematically decide, which week number we are currently in?
: http://www.perl.org/CPAN

: Since i've never needed the week number, I am not aware of any
: explicit tool/feature/function/whatever but I suspect there is
: something, especially in unix, to get this info directly.  I mean, for
: some  financial stuff, this would be important, I would think.

in unix:  
date +%V -d "31 Dec 1998"
53

  %V		The method for determining the week number shall be as 
		specified in ISO 8601.


-- 
Sami Poikonen   
  sp@iki.fi





































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

Date: Mon, 13 Jul 1998 12:52:07 -0700
From: Yary <fecund@fatnet.net>
Subject: Re: compare MS Word files
Message-Id: <35AA6567.4FAE@fatnet.net>

The memory-leak security hole goes away when saving as RTF.
Plus, the document is then in a documented format!
There are even public domain tools for working with RTF.
Since it's a text file, diff(1) will work for her purposes.


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

Date: Mon, 13 Jul 1998 21:03:43 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: Deutsche Boerse sucht 100 neue Mitarbeiter im IT-Bereich
Message-Id: <Pine.HPP.3.95a.980713210237.21168E-100000@hpplus01.cern.ch>

On Mon, 13 Jul 1998, Philipp Steinau wrote:

(hopelessly crossposted)

> Wenn ihr schon mal Deutsch schreibt, geselle ich mich mal dazu :-)
> Gibt es eigentlich eine mit dieser vergleichbare NG auch in
> Deutsch? 

klar: de.comm.infosystems.www.authoring



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

Date: Mon, 13 Jul 1998 15:27:09 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: First meeting of Dallas.pm
Message-Id: <comdog-ya02408000R1307981527090001@news.panix.com>
Keywords: from just another new york perl hacker

In article <8667h2ul99.fsf@gwaihir.ee.ethz.ch>, Matthias Neeracher <neeri@iis.ee.ethz.ch> posted:

>Randal Schwartz <merlyn@stonehenge.com> writes:
>> >>>>> "Brand" == Brand and Karina Hilton <bkhilton@netcom.com> writes:
>> 
>> Brand> The first meeting of the Dallas Perl Mongers is on:
>> Brand>   Place: Juan's Cantina, southwest corner of Central
>> Brand>          Espressway and Belt Line Rd, Richardson.
>> 
>> Yes, it's nice that all the new Perl Monger groups seem to be
>> following that fine old tradition established by the prototype PM
>> (NY.PM) of holding their meetings in a bar. :-)
>
>Hey, given your business investments, doesn't such a statement represent a
>conflict of interest? :-)

we don't let Randal vote on matters that involve free alcohol for
him. ;)

-- 
brian d foy                                  <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>


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

Date: Mon, 13 Jul 1998 20:12:17 GMT
From: willwebber@my-dejanews.com
Subject: Forcing DOS window to stay open
Message-Id: <6odpn0$lmb$1@nnrp1.dejanews.com>

Hello all. I just recently put PERL on my home system(Win95) to work on some
things locally before uploading to the server. And, I seem to have a problem
keeping the DOS window open that the PERL runs in. I tried throwing a line of
code in that waits for you to hit a key before it quits the program (waits
for a STDIN entry). But, this method only seems to work if the code runs okay
without breaking. If the code breaks, the window shows the errors (for a
split second) then closes. Any suggestions on how to force it to stay open
regardless of the events of compile and run?  Any suggestions would be
great--

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum


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

Date: Mon, 13 Jul 1998 20:23:22 GMT
From: sowmaster@juicepigs.com (Bob Trieger)
Subject: Re: Forcing DOS window to stay open
Message-Id: <6odqg6$bp$2@strato.ultra.net>

[ posted and mailed ]

willwebber@my-dejanews.com wrote:
-> Hello all. I just recently put PERL on my home system(Win95) to work on some
-> things locally before uploading to the server. And, I seem to have a problem
-> keeping the DOS window open that the PERL runs in. I tried throwing a line of
-> code in that waits for you to hit a key before it quits the program (waits
-> for a STDIN entry). But, this method only seems to work if the code runs okay
-> without breaking. If the code breaks, the window shows the errors (for a
-> split second) then closes. Any suggestions on how to force it to stay open
-> regardless of the events of compile and run?  Any suggestions would be
-> great--

It will stay open if waiting for input. But, why not just open a window and 
run your program from the command prompt? The window won't close then until 
you close it.

HTH

Bob Trieger
sowmaster@juicepigs.com
" Cost a spammer some cash: Call 1-800-400-1972 
  Ext: 1949 and let the jerk that answers know 
  that his toll free number was sent as spam. "


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

Date: Mon, 13 Jul 1998 19:26:03 GMT
From: bernie@fantasyfarm.com (Bernie Cosell)
Subject: Re: Getting Yesterday's Date
Message-Id: <35aa5eea.60778055@news.swva.net>

"Scott Ranzal" <scott.ranzal@mci.com> wrote:

} If you use localtime() and get the current epoch time you can subtract 86400
} seconds from that.  86400 is the number of seconds in one day.
} Then you can feed localtime($today-86400), which will give you yesterday,
} regardless of what yesterday was.

Actually, that's not correct.  If daylight saving time started yesterday
morning and it is just past midnight, then subtracting 86400 seconds will
get you 11pm -two- days ago.

  /Bernie\
-- 
Bernie Cosell                     Fantasy Farm Fibers
bernie@fantasyfarm.com            Pearisburg, VA
    -->  Too many people, too few sheep  <--          


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

Date: Mon, 13 Jul 1998 17:41:31 GMT
From: dont.reply@this.address (John Oliver)
Subject: Re: I am an "antispam spammer"?
Message-Id: <35aa4607.350180732@enews.newsguy.com>

On 11 Jul 1998 01:08:28 GMT, dmacks@sas.upenn.edu (Daniel E. Macks)
wrote:

>CLPM has a large contingent of "if you want a reply by email, I'd damn
>well better be able to just hit reply." That's one of the
>characteristics that's developed in the froup. An even stronger
>contingent is "you asked by posting, so I'm gonna reply by posting"
>(at one point the FAQ made this very clear). One of the premises there
>is that one is coming for help, so one must do everything possible to
>help folks help that person. Each additional hoop is that many more
>YAPHer (possibly the only one with the answer to a tricky question)
>who will say "too much trouble...I'll skip this one."

What I don't understand, though, are the people who evidentially want
to reply (most likely too the newsgroup), but as soon as they detect a
munged address, *that* becomes the basis of their reply.  Never mind
that the person never asked for an email reply, and may have even
stated that they expect replies to the NG... nope, damn it, they have
a munged address, so by God they're an inconsiderate bastard and I'm
going to tell them so!  And screw them... I'm not going to help them!

Very strange...

-- 
**********************************************************
IMPORTANT! >>>>>>>>>>>>>>>>>>>>>>>>>>>
**********************************************************
If you wish to reply to me via email, watch out for
my spam-trap.  I can be reached at joliver at oliver
dot escondido dot ca dot us.  Sorry for the 
inconvenience, but I hate spam...

On that note, if you hate spam too, join CAUCE!
www.cauce.org
**********************************************************


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

Date: Mon, 13 Jul 1998 15:37:01 -0400
From: jordyn@bestweb.net (Jordyn A. Buchanan)
Subject: Re: I am an "antispam spammer"?
Message-Id: <jordyn-1307981537010001@vermeer.bestweb.net>

In article <35aa4607.350180732@enews.newsguy.com>, dont.reply@this.address
wrote:

> On 11 Jul 1998 01:08:28 GMT, dmacks@sas.upenn.edu (Daniel E. Macks)
> wrote:
> 
> >CLPM has a large contingent of "if you want a reply by email, I'd damn
> >well better be able to just hit reply." That's one of the
> >characteristics that's developed in the froup. An even stronger
> >contingent is "you asked by posting, so I'm gonna reply by posting"
> >(at one point the FAQ made this very clear). One of the premises there
> >is that one is coming for help, so one must do everything possible to
> >help folks help that person. Each additional hoop is that many more
> >YAPHer (possibly the only one with the answer to a tricky question)
> >who will say "too much trouble...I'll skip this one."
> 
> What I don't understand, though, are the people who evidentially want
> to reply (most likely too the newsgroup), but as soon as they detect a
> munged address, *that* becomes the basis of their reply.  Never mind
> that the person never asked for an email reply, and may have even
> stated that they expect replies to the NG... nope, damn it, they have
> a munged address, so by God they're an inconsiderate bastard and I'm
> going to tell them so!  And screw them... I'm not going to help them!

Well, perhaps the reponse isn't material that's really widely useful, so
it's sent off as an e-mail in order to avoid cluttering the newsgroup.  If
you don't actually *check* the e-mail address before you send it off, you
end up with a bounce.  At this point, the person trying to help out
either:

   a) has wasted his or her effort in composing a reply;
or
   b) has to take additional effort to post the reply to the newsgroup
      or to de-munge

Either way, life becomes more complicated for the person attempting to be
helpful.

I'm not saying that address-munging doesn't have its place; it's never
bothered me particularly much.  There are certainly situations in which it
costs a respondant time and effort, though.

Jordyn


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

Date: Mon, 13 Jul 1998 18:48:06 GMT
From: Grehom@my-dejanews.com
Subject: Re: Lenght of string ... newbie eats humble pie!
Message-Id: <6odkp6$3u5$1@nnrp1.dejanews.com>

Thank you James - even though I'm a Perl Newbie myself I couldn't fight the
temptation to reply to this one - and to read the other replies to it :) and
then shock HHHOOOrror I learnt something - I tried typing your advice about
the perldoc and found that it works for us Win95 users (in a DOS shell) too!!
And there was me thinking 'that's all well and good for you Unixxers'

In article <fl_aggie-1207981325410001@aggie.coaps.fsu.edu>,
  fl_aggie@thepentagon.com (I R A Aggie) wrote:
> In article <kq90lzcb6z.fsf@atrey.karlin.mff.cuni.cz>, Ondrej Sury
> <shade@atrey.karlin.mff.cuni.cz> wrote:
>
> + 1.  How do I find out length of string in Perl?
>
> Let me restate the question:
>
> Q: How do I find out how to find out the lenght of a string in Perl?
>
> A: The included documentation is your friend, and should be installed
>    locally. For a properly installed system, one may simply:
>
> shell% perldoc -f length | pod2text
>     length EXPR
>     length
>     Returns the length in characters of the value of EXPR. If EXPR
>     is omitted, returns length of $_.
>
> James
>

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum


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

Date: Mon, 13 Jul 1998 14:33:36 -0500
From: Bryan Camp <b-camp@students.uiuc.edu>
Subject: Merging files
Message-Id: <Pine.SOL.3.96.980713141122.17364A-100000@ux5.cso.uiuc.edu>


Hello,

I have a simple question about merging data between two files.
Here are sample lines of data from the two files:

file1:
lan_ic:74hc175 520-005 NA SMT

file2:
AM27256-2, ADVANCED_MICRO, 520-004
AM27256-3, ADVANCED_MICRO, 520-005

As you can see, the fields in file1 are
separated by spaces, and the fields in 
file2 are separated by commas.  What I want to do
is compare column 2 from file1 (520-005) with
column 3 from file2 (520-004, 520-005).  If the two columns
are equal, then I want to append column 2 from file2
onto the end of the current line in file1 as follows:

lan_ic:74hc175 520-005 NA SMT ADVANCED_MICRO

I'm not having any trouble with the comparison part,
as I've used a couple of "split" statements, but I'm
having problems appending the 2nd column on to the end of the current
line, and not to the end of the file.  Can anyone point me in
the right direction?  Thank you very much.

Bryan



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

Date: Mon, 13 Jul 1998 20:11:09 GMT
From: Grehom@my-dejanews.com
Subject: Re: My script stops searching...
Message-Id: <6odpks$llc$1@nnrp1.dejanews.com>

It's just a thought but could the script find it's own output log and start to
write further entries on the end - snake eating its own tail sort of thing

In article <6odg2m$cij$1@nr1.vancouver.istar.net>,
  "Geoff Wild" <geoff_wild@dynapro.com> wrote:
> I am trying to search every text file on our system for a particular string.
>
> The command line is: test.pl <STRING>
>
> I'm using a script from Larry Wall's Programming Perl book.
>
> The difference is I want the output to a file, I have tried the script with
> the log file as well as to STDOUT - and once I have hit 94 files, the script
> slowly loses cpu, until it uses nothing.
>
> I thought maybe it was dying on a large file - but nope - I moved that file
> to another directory - and the script still stops searching after 94 files.
>
> I get no error messages.....
>
> Anyone have any ideas I can try?
>
> Thanks...Geoff
>
> Here's the script:
>
> #!/usr/bin/perl
> $LOGFILE="/tmp/test.pl.log";
> open(FIND, "find . -print |") || die "Couldn't run find: $!\n";
> FILE:
> while ($filename = <FIND>) {
>         chop $filename;
>         next FILE unless -T $filename;
>         if (!open(TEXTFILE, $filename)) {
>                 print STDERR "Can't open $filename - continuing...\n";
>                 next FILE;
>         }
>         open(LOG, ">> $LOGFILE");
>         while (<TEXTFILE>) {
>                 foreach $word (@ARGV) {
>                         if (index($_, $word) >= 0) {
>                                 print LOG $filename, "\n";
>                                 next FILE;
>                         }
>                 }
>         }
> }
> close(LOG);
>
>

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/rg_mkgrp.xp   Create Your Own Free Member Forum


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

Date: Mon, 13 Jul 1998 19:07:41 GMT
From: tnguru@termnetinc.com (Ben Coleman)
Subject: Re: new charter and moderator for comp.lang.perl.announce
Message-Id: <35aa5851.242216659@news.mindspring.com>

On 09 Jul 1998 23:17:03 -0700, Russ Allbery <rra@stanford.edu> wrote:


>The key point here
>is that the things have to be of interest to the readers, *not* things
>that the company thinks the readers will be interested in.

With that in mind, I'd suggest that if commercial announcements are
allowed, the charter should explicitly allow the moderator to reject
submissions for excessive hype(I believe comp.os.os2.announce has a similar
provision).

Ben
-- 
Ben Coleman
Senior Systems Analyst
TermNet Merchant Services, Inc.
Atlanta, GA


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

Date: Mon, 13 Jul 1998 15:28:55 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: page is not showing until perl program is finished
Message-Id: <comdog-ya02408000R1307981528550001@news.panix.com>
Keywords: from just another new york perl hacker

In article <6o9kl7$8r0$1@nnrp1.dejanews.com>, dwiesel@my-dejanews.com posted:

>Does anyone know how I can make some of my page show up for the user although
>the program is not finished?

see the CGI Meta FAQ.

good luck :)

-- 
brian d foy                                  <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>


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

Date: 13 Jul 1998 20:22:43 GMT
From: stephen@alias-2.pr.mcs.net (Stephen McCamant)
Subject: Re: Parsing Perl
Message-Id: <slrn6qkr35.9u3.stephen@alias-2.pr.mcs.net>

On 13 Jul 1998 16:19:25 GMT, Tom Christiansen <tchrist@mox.perl.com> wrote:
>In comp.lang.perl.misc, Dan Schmidt <dfan@harmonixmusic.com> writes:
>:Is it possible to run perl in such a way to do its compilation to
>:bytecode (and not run the resulting code) and emit some sort of
>:representation that could be used by a pretty-printer?
>
>I have this notion that one could do it with some
>of Malcolm's intermediary stages.

Yes. Specifically, see the B::Deparse module in recent development versions
(originally by Malcolm, significantly enhanced by me). It generates perl
code, marks up the beginnings and ends of blocks, and uses this to do
rudimentary indentation. Its current idea of `beauty' is pretty simplistic,
but it could be extended to handle lining up parts of expressions, syntax
highlighting, etc.

-- 
____________________________________________________________
Stephen McCamant ======== alias@mcs.com (finger for PGP key)


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

Date: 13 Jul 1998 20:28:29 GMT
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Parsing Perl
Message-Id: <6odqld$3vu$1@csnews.cs.colorado.edu>

 [courtesy cc of this posting sent to cited author via email]

In comp.lang.perl.misc, alias@mcs.com writes:
:Yes. Specifically, see the B::Deparse module in recent development versions
:(originally by Malcolm, significantly enhanced by me). It generates perl
:code, marks up the beginnings and ends of blocks, and uses this to do
:rudimentary indentation. Its current idea of `beauty' is pretty simplistic,
:but it could be extended to handle lining up parts of expressions, syntax
:highlighting, etc.

Does it lose the comments and pods?

--tom
-- 
"'My country right or wrong' is like saying, 'My mother drunk or sober.'" 
 - G. K. Chesterton


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

Date: Mon, 13 Jul 1998 16:03:48 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Perl Beautifier Home Page
Message-Id: <comdog-ya02408000R1307981603480001@news.panix.com>
Keywords: from just another new york perl hacker

In article <35A87D71.1D8DBD36@halcyon.com>, Tim Maher <tim.maher@halcyon.com> posted:

>I've got my Perl Beautifier running, with a reasonable set
>of default options, on
>http://www.consultix.wa.com/yumpy/cgi-pvt/pbeaut.cgi.
>
>It's been tested primarily with the 66 modules of the standard
>Perl distribution, so I'm interested to see what happens when
>it's confronted with other programming styles.
>
>Please help me test it by whipping some of your code at
>it!  I'll be Emailed any syntax errors that my beautifier
>introduces, which could help me improve it, prior to making
>it more generally available.

some oddities i noticed:

   * it uses an 8 column tab (perlstyle leans towards 4)

   * it turns $obj->method into $obj -> method.

   * complains about __END__

   * takes formatted code such as

         $a     = 4;
         $bee   = 5;

      and makes it

         $a = 4;
         $bee = 5;

      which is not good.

   * it mangled lines that looked like:

      print "calendar: family free is [$family_free]\n" if $debug > 0;

   to

      print "calendar: family free is [$family_free]\n" if $debug 
         >0;

   which lost the space after the > (not good!) and removed it from
   the construct it belongs to.

-- 
brian d foy                                  <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>


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

Date: Mon, 13 Jul 1998 15:33:06 +0000
From: John Call <johnc@interactive.ibm.com>
Subject: Perl Development Enviornments
Message-Id: <35AA2895.BABD6055@interactive.ibm.com>

Does anyone here use one of the Perl development enviornments like
ActiveState's or PerlBuilder? I'm looking for people who have actually
used them and either loved or hated them.

I don't dislike my current mode of developing but was intrigued by the
advertisements in TPJ for these tools. Is it just hype or do they
deliver what they promise?

--
John Call
IBM Interactive Media



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

Date: Mon, 13 Jul 1998 13:46:22 -0700
From: "spamspamspamspam(Too much MP)" <spam@spam.com>
Subject: Re: Perl-HTML not interpreted
Message-Id: <6odrgh$nem@masters0.InterNex.Net>

I've ran into something similar. Though rather new to PERL I was suprised to
find out that when I was printing from inside sub MySub the calling form
didn't receive the HTML I was trying to send. When I put it inside the main
portion of code it did work. As such I just stuck in a variable and used an
IF structure to return the HTML page(s).

I hope this helps.

Side note, this was written for an NT 4 box running IIS. Not my choise, but
what I's stuck with.





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

Date: Mon, 13 Jul 1998 15:21:10 -0400
From: comdog@computerdog.com (brian d foy)
Subject: Re: Putting CPAN on a CD: good or not good?
Message-Id: <comdog-ya02408000R1307981521100001@news.panix.com>
Keywords: from just another new york perl hacker

In article <6ocoav$cbv$1@samba.rahul.net>, c.c.eiftj@98.usenet.us.com (Rahul Dhesi) posted:

>If each CD comprises a self-consistent set of programs, and if they are
>in working order when the CD is released, then they will continue to
>work together just as well in the future.

that's a lot of assumptions about the quality of programs and modules ;)

but, being the americentric-never-lived-outside-of-North-America person
that i am, i appreciate the comments about the expensive online charges
for overseas.  kinda easy to forget when you have a T1 (literally)
next to your desk. :)

-- 
brian d foy                                  <comdog@computerdog.com>
CGI Meta FAQ <URL:http://computerdog.com/CGI_MetaFAQ.html>
Comprehensive Perl Archive Network (CPAN) <URL:http://www.perl.com>
Perl Mongers Travel Deals! <URL:http://www.pm.org/travel.html>


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

Date: 12 Jul 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 Mar 98)
Message-Id: <null>


Administrivia:

Special notice: in a few days, the new group comp.lang.perl.moderated
should be formed. I would rather not support two different groups, and I
know of no other plans to create a digested moderated group. This leaves
me with two options: 1) keep on with this group 2) change to the
moderated one.

If you have opinions on this, send them to
perl-users-request@ruby.oce.orst.edu. 


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

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