[12232] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 5832 Volume: 8

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Sun May 30 02:07:15 1999

Date: Sat, 29 May 99 23:00:20 -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           Sat, 29 May 1999     Volume: 8 Number: 5832

Today's topics:
    Re: cont'd <727182824@worldnet.att.net>
    Re: cont'd <727182824@worldnet.att.net>
    Re: FAQ 4.16: Does Perl have a year 2000 problem? Is Pe <ebohlman@netcom.com>
        have llamas, will travel <uri@sysarch.com>
    Re: How do I sort unique items from a sorted array? <rootbeer@redcat.com>
    Re: How do I tell which user is logged on with Perl? (Martin Vorlaender)
    Re: how to upload file from the form? <rootbeer@redcat.com>
    Re: Im not asking for much (I R A Aggie)
    Re: Is 'Global symbol "%s" requires...' Fatal? <rootbeer@redcat.com>
        Looking for Net::SMTP <Charles.Bartholomew@worldnet.att.net>
    Re: Making executables from .pl files? <ebohlman@netcom.com>
    Re: More errors I don't understand (Bill Moseley)
        NT DBI Install Problem <wbratton@wdpb.com>
        package OO::Closures (was Re: In favor of extending "my <rick.delaney@home.com>
    Re: Perl "constructors" (Abigail)
    Re: Perl scripts on Berkeley Unix/Apache? <ebohlman@netcom.com>
    Re: Perl scripts on Berkeley Unix/Apache? <walton@frontiernet.net>
        Please help on RegXpression tvn007@my-deja.com
    Re: Please help on RegXpression <rootbeer@redcat.com>
    Re: Running a Background Process from CGI <walton@frontiernet.net>
    Re: Thanks man....HOWS THIS? (I R A Aggie)
    Re: Using a variable in a hash statement <uri@sysarch.com>
        Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)

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

Date: Sat, 29 May 1999 23:08:37 -0700
From: "JaxWorldnet" <727182824@worldnet.att.net>
Subject: Re: cont'd
Message-Id: <7iq9ru$q7e$1@bgtnsc01.worldnet.att.net>


Ronald J Kimball wrote in message =
<1dskhyx.cqadcts9g3mgN@p59.tc2.metro.ma.tiac.com>...

>One way the poster is probably not familiar with is here-docs.
>
>print <<END;
>Here is a newline
>and here is another
>and that's it.
>END
>
>
>Of course, lest a newbie think here-docs are only for printing...
>
>$string =3D <<END;
>Here is a newline
>and here are two more
>
>and that's it.
>END
>


I tried both examples above but got the same messages below:
=20
Running: e:\perl5\bin\perl  F:\Perl\Scripts\test.pl
Can't find string terminator "END" anywhere before EOF at =
F:\Perl\Scripts\test.pl line 1.

In fact, I have tried every example I saw posted in this  and other =
newsgroup, but never succeeded.=20
I understand this is a very useful technique to dynamically create an =
entire (HTML) document.
I have AvtivePerl 509 and Win98. Am I missing some components here?

TIA,
Donah



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

Date: Sat, 29 May 1999 23:38:36 -0700
From: "JaxWorldnet" <727182824@worldnet.att.net>
Subject: Re: cont'd
Message-Id: <7iqbk7$kqo$1@bgtnsc02.worldnet.att.net>


Ronald J Kimball wrote in message =
<1dskhyx.cqadcts9g3mgN@p59.tc2.metro.ma.tiac.com>...
>
>One way the poster is probably not familiar with is here-docs.
>
>print <<END;
>Here is a newline
>and here is another
>and that's it.
>END
>
>
>Of course, lest a newbie think here-docs are only for printing...
>
>$string =3D <<END;
>Here is a newline
>and here are two more
>
>and that's it.
>END
>
I tried both examples above and only got the same message below:

Running: e:\perl5\bin\perl  F:\Perl\Scripts\test.pl
Can't find string terminator "END" anywhere before EOF at =
F:\Perl\Scripts\test.pl line 1.

I have ActivePerl 509 and Win98. Am I missing something?

Doanh



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

Date: Sun, 30 May 1999 01:59:05 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: FAQ 4.16: Does Perl have a year 2000 problem? Is Perl Y2K compliant?
Message-Id: <ebohlmanFCIw6I.1JK@netcom.com>

finsol@ts.co.nz wrote:
: In the same section of my article I also included CICS, MVS and
: Javascript - all of which could be disputed as being a programming
: language. For the purposes of the article, in which I tried to avoid as
: much jargon as possible, it was convenient to describe them as
: programming languages, as programmers use them for
: instructing computers i.e. programming. My point was to draw attention
: to these languages as having a problem - which they do.  You are only
: arguing semantics because you are unable to sucessfully argue against my
: main point which is that the Perl programming language is Y2K booby
: trapped.

Blurring the distinctions between concepts isn't simplifying things, it's 
simplisticating them.  "Programming language" is a well-defined concept.  
"Operating system" is a well-defined concept.  "Transaction processor" is 
a well-defined concept.  The only place those concepts intersect is that 
they all deal with computers.

Do you also go around urging companies to make sure their printer cables 
are Y2K-compliant?  Their diskettes?  The cloths they wipe their monitors 
with?



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

Date: 30 May 1999 00:03:48 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: have llamas, will travel
Message-Id: <x7vhdbfbkr.fsf@home.sysarch.com>


if you like llamas here is a neat article:

http://www.boston.com/dailyglobe2/149/living/Have_llamas_will_travel+.shtml

uri

-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
uri@sysarch.com  ---------------------------  Perl, Internet, UNIX Consulting
Have Perl, Will Travel  -----------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

Date: Sat, 29 May 1999 21:34:54 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: How do I sort unique items from a sorted array?
Message-Id: <Pine.GSO.4.02A.9905292130460.13014-100000@user2.teleport.com>

On Sat, 29 May 1999, AEF wrote:

> Subject: How do I sort unique items from a sorted array?

Could you want perlfaq4's entry "How can I extract just the unique
elements of an array?"

> With an array of sorted wages of all the data of various job
> categories, sort the job categories that exist in the array into order
> of the higest to lowest paid job category, and print the job category
> only once.

Sounds as if you do. I'd probably try using a hash.

    print "Category: $category\n"
	unless $seen{$category}++;

Hope this helps!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: Sun, 30 May 1999 04:38:48 +0200
From: martin@RADIOGAGA.HARZ.DE (Martin Vorlaender)
Subject: Re: How do I tell which user is logged on with Perl?
Message-Id: <3750a4b8.524144494f47414741@radiogaga.harz.de>

ace (kawaii_1@hotmail.com) wrote:
: I'm trying to write a script that will log to a text file the user
: that accessed my htaccess protected area by logging in through
: the popup window created by htaccess (or whatever does it)
:
: Upon entering my members' area url I would like the script to log
: which user is there.
:
: How can I determing who the current user is? The url in the browser
: after logging in DOES NOT LOOK LIKE THIS:
: myid:mypassword@www.domain.com
:
: It only looks like this:
: www.domain.com
:
: Anyone have any ideas how to do this?

The CGI standard (http://hoohoo.ncsa.uiuc.edu/cgi/overview.html) defines
an environment variable called REMOTE_USER that should be useful.

cu,
  Martin
--
                        | Martin Vorlaender | VMS & WNT programmer
 VMS is today what      | work: mv@pdv-systeme.de
 Microsoft wants        |       http://www.pdv-systeme.de/users/martinv/
 Windows NT 8.0 to be!  | home: martin@radiogaga.harz.de


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

Date: Sat, 29 May 1999 21:48:19 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: how to upload file from the form?
Message-Id: <Pine.GSO.4.02A.9905292137530.13014-100000@user2.teleport.com>

On Sun, 30 May 1999, Gleb Ekker wrote:

> Is it really such hard problem that it can not be done without using
> any module?

This is like asking "Is getting to San Francisco from Tallinn such a hard
problem that it can not be done without an airplane?" You _could_ do many
tasks in Perl without a module. But often the best way, by far, is to use
a well-designed module.

> My provider do not allow to use perl modules and this provider is
> the only one who allows to use perl scripts in our country - Estonia.

Perhaps you should see whether there is a flight available to San
Francisco from Tallinn. :-)

Seriously, you should tell your provider that if you were to do without
modules, your program would (almost certainly) be slower to write, slower
to run, more buggy, harder to fix, less compatible, and more likely to
cause problems for everybody, including the provider. Point out that perl
isn't properly installed unless some modules are available, in fact, and
the CGI module is one such module. Suggest that adding some well-written
modules from CPAN would make the provider's task of maintaining the system
easier, in fact.

Failing that, most sysadmins can be bribed. Good luck!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: 30 May 1999 00:58:44 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Im not asking for much
Message-Id: <slrn7l13g5.91v.fl_aggie@thepentagon.com>

On 29 May 1999 08:06:09 -0700, Tom Christiansen <tchrist@mox.perl.com>, in
<374ff451@cs.colorado.edu> wrote:
+      [courtesy cc of this posting mailed to cited author]
+ 
+ In comp.lang.perl.misc, fl_aggie@thepentagon.com writes:
+ :   print "Learning Perl by Randal Schwartz\n";
+ 
+ Excuse me?

I'm evil, I'm slime, I'm the lowest of the low, I have broccoli in my
socks, I hear voices and do their bidding.

I own the first edition Llama, not the second, of which TomC is an
author...

James


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

Date: Sat, 29 May 1999 21:26:45 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Is 'Global symbol "%s" requires...' Fatal?
Message-Id: <Pine.GSO.4.02A.9905292124520.13014-100000@user2.teleport.com>

On 29 May 1999, Ilya Zakharevich wrote:

> > >     Global symbol "$no_var" requires explicit package name at (eval 1)
> > 
> > > Why I cannot catch this error at eval-1?
> > 
> > For reasons unknown to me, the error message is going through the warn
> > mechanism rather than being trappable by the eval. Could be a bug in Perl.
> 
> Would you prefer to see only one syntax error per compilation?

Maybe I think more of the people who implement perl than you do. :-)

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: Sun, 30 May 1999 01:25:41 -0400
From: "Charles Bartholomew" <Charles.Bartholomew@worldnet.att.net>
Subject: Looking for Net::SMTP
Message-Id: <7iqi44$52f$1@bgtnsc01.worldnet.att.net>

Hello

I am looking for the module Net::SMTP.

I have tried the ActiveState site as well as a couple of others. Although
the module is listed in the list of available modules I can not find the
actual module.

Any help would be appreciated.

Thank You.




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

Date: Sun, 30 May 1999 01:48:46 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: Making executables from .pl files?
Message-Id: <ebohlmanFCIvpA.14q@netcom.com>

Abigail <abigail@delanet.com> wrote:
: ralawrence@my-dejanews.com (ralawrence@my-dejanews.com) wrote on MMLXXV
: September MCMXCIII in <URL:news:7guaqj$pa8$1@nnrp1.deja.com>:
: \\ 
: \\                                                                If you wrote
: \\ an inpressive encryption/decription system then you might not want to hand
: \\ out the source code.


: An encryption/description system _without_ source is meaningless, and
: certainly not at all impressive.

In cryptography you *always* assume that the bad guy has access to your 
algorithms.  Always.  rot13 is more secure than any cryptosystem that can 
be broken by examination of source.



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

Date: Sat, 29 May 1999 20:30:38 -0700
From: moseley@best.com (Bill Moseley)
Subject: Re: More errors I don't understand
Message-Id: <MPG.11ba50b516af6b89989739@206.184.139.132>

[This followup was posted to comp.lang.perl.misc and a copy was sent to 
the cited author.]

In article <37501BE3.E4E20BD4@home.com>, rick.delaney@home.com says...
> [posted &mailed]
> 
> Bill Moseley wrote:
> > 
> > First, the copy (backup) of the database files failed.  My log file 
> > had this in it:
> > 
> >   Maintenance run started at: Mon May 24 02:00:02 1999
> >   ERROR: copy (cp) returned '65535' attempting to copy 'Mon' backup
> > 
> > And the perl that generated this error is:
> > 
> >     # using a shell for globbing
> >     my $rc = 0xffff & system("cp *\.db Backup.$day");
> 
> If you're going to shell out to a command, then log the stderr from the
> command, not just it's exit value.  See perlfaq8, "How can I capture
> STDERR from an external command?"

I'm a bit confused.  I've got STDERR going to a log file when I run the 
system() command, yet I didn't see any errors relating to the copy.  And 
as a cron job any STDOUT gets emailed to me, which didn't happen in this 
case.

Am I missing something obvious?

> > The other problem is that the "open3: fork failed" was a fatal error 
> > and processing didn't continue after that error.
> > 
> > Any suggestions on how I can trap the "open3: fork failed" fatal error 
> > so I can continue processing?  I don't want the program to stop 
> > running just because it failed to send mail.
> 
> perldoc -f eval
> 
> eval {
>     open3( $in, $out, $err, $params )
> };
> 
> print LOG $@ if $@;

Oh, yes, silly me.


-- 
Bill Moseley mailto:moseley@best.com


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

Date: Sat, 29 May 1999 22:33:34 -0700
From: wbratton <wbratton@wdpb.com>
Subject: NT DBI Install Problem
Message-Id: <3750CDAE.E0C91D15@wdpb.com>

I'm attempting to install DBI on NT.  I get the link errors below can
anyone help...


DBI.c
        link -out:blib\arch\auto\DBI\DBI.dll -dll -nologo -nodefaultlib
-release
 -machine:x86 DBI.obj
I:\activeperl\5.00502\lib\MSWin32-x86-object\CORE\perlCA
PI.lib i:\activeperl\5.00502\lib\MSWin32-x86-object\CORE\PerlCRT.lib
-def:DBI.de
f
   Creating library blib\arch\auto\DBI\DBI.lib and object
blib\arch\auto\DBI\DBI
 .exp
DBI.obj : error LNK2001: unresolved external symbol
__imp__Perl_no_security
perlCAPI.lib(perlCAPI.obj) : error LNK2001: unresolved external symbol
__imp__In
itializeCriticalSection@4
perlCAPI.lib(perlCAPI.obj) : error LNK2001: unresolved external symbol
__imp__De
leteCriticalSection@4
PerlCRT.lib(dllmain.obj) : error LNK2001: unresolved external symbol
__imp__Disa
bleThreadLibraryCalls@4
blib\arch\auto\DBI\DBI.dll : fatal error LNK1120: 4 unresolved externals

NMAKE : fatal error U1077: 'link' : return code '0x19'
Stop.



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

Date: Sun, 30 May 1999 02:55:44 GMT
From: Rick Delaney <rick.delaney@home.com>
Subject: package OO::Closures (was Re: In favor of extending "my" to apply to subroutines as well as variables)
Message-Id: <3750A867.3DC4FE03@home.com>

[posted & mailed]

This is quite excellent, but I have a couple of little questions.

Abigail wrote:
> 
>         if ($method =~ /^([^:]+|:[^:])*::(.*)/s) {
                                  ^^^^^
>             $class  = $1;
>             $method = $2;
>         }

What kind of method name is this for?
 
[snip]
 
>         foreach my $super (@supers) {
>             if (wantarray) {
>                 my     @tmp;
>                 eval  {@tmp = $super -> ($method => @args)};
>                 return @tmp unless $@;
>             }
>             elsif (defined wantarray) {
>                 my     $tmp;
>                 eval  {$tmp = $super -> ($method => @args)};
>                 return $tmp unless $@;
>             }
>             else {
>                 eval  {$super -> ($method => @args)};
>                 return unless $@;
>             }
>             croak $@ unless $@ =~ /No such method/;
>         }

Why this song-and-dance?  Is there some case where 

        foreach my $super (@supers) {
            return eval { $super -> ($method => @args) } unless $@;
            croak $@ unless $@ =~ /No such method/;
        }

would not produce the desired results?

[snip]
 
> Here is an example of the usage:
> 
>     use OO::Closures;
>     sub dice {
>         my (%methods, %ISA, $self);
>         $self = make_object (\%methods, \%ISA, !@_);
                  ^^^^
ITYM 'create_object' here.  Or else

    use OO::Closures 'make_object';

Thanks for a great module.

-- 
Rick Delaney
rick.delaney@home.com


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

Date: 29 May 1999 20:36:37 -0500
From: abigail@delanet.com (Abigail)
Subject: Re: Perl "constructors"
Message-Id: <slrn7l15ui.7ub.abigail@alexandra.delanet.com>

armchair@my-dejanews.com (armchair@my-dejanews.com) wrote on MMLXXXIV
September MCMXCIII in <URL:news:7hmjed$o45$1@nnrp1.deja.com>:
"" 
"" I have no problem using atoi() or atof() to convert between types.

If you want C, you know where to get it.



Abigail
-- 
perl -we 'print split /(?=(.*))/s => "Just another Perl Hacker\n";'


  -----------== Posted via Newsfeeds.Com, Uncensored Usenet News ==----------
   http://www.newsfeeds.com       The Largest Usenet Servers in the World!
------== Over 73,000 Newsgroups - Including  Dedicated  Binaries Servers ==-----


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

Date: Sun, 30 May 1999 01:52:07 GMT
From: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: Perl scripts on Berkeley Unix/Apache?
Message-Id: <ebohlmanFCIvuv.1As@netcom.com>

ValH. <vhealey@qwestinternet.net> wrote:
: I'm a newbie to Perl on Berkeley Unix/Apache and have been given only a few 
: instructions by my web hosting outfit. I have run Perl scripts on NT, with very 
: few problems, but this Unix machine baffles me. 

I suspect your real problem isn't with the difference between Unix and 
NT, but with the difference between running a script locally and having a 
Web server run it.

: The web host says that the scripts should be referenced:  /bin/perl, so I make 
: the following dinky script in Windows Notepad (yes, a text file):

: #!/bin/perl
: print "Hello, world\n";

: IE 5 says "server error" and Netscape 4.5 says "the server made a boo boo."

Since your script doesn't output any CGI headers, a Web server isn't 
going to know what to do with its output.  Go over to 
http://reference.perl.com, look in the CGI section and find yourself a 
good CGI tutorial.



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

Date: Sat, 29 May 1999 22:36:21 -0400
From: Bob Walton <walton@frontiernet.net>
To: Eric Bohlman <ebohlman@netcom.com>
Subject: Re: Perl scripts on Berkeley Unix/Apache?
Message-Id: <3750A425.50191405@frontiernet.net>



Eric Bohlman wrote:

> ValH. <vhealey@qwestinternet.net> wrote:
> : I'm a newbie to Perl on Berkeley Unix/Apache and have been given only a few
> : instructions by my web hosting outfit. I have run Perl scripts on NT, with very
> : few problems, but this Unix machine baffles me.
>
> I suspect your real problem isn't with the difference between Unix and
> NT, but with the difference between running a script locally and having a
> Web server run it.
>
> : The web host says that the scripts should be referenced:  /bin/perl, so I make
> : the following dinky script in Windows Notepad (yes, a text file):
>
> : #!/bin/perl
> : print "Hello, world\n";
>
> : IE 5 says "server error" and Netscape 4.5 says "the server made a boo boo."
>
> Since your script doesn't output any CGI headers, a Web server isn't
> going to know what to do with its output.  Go over to
> http://reference.perl.com, look in the CGI section and find yourself a
> good CGI tutorial.

One other strong possibility is that the UNIX web server is running your script as a
very non-privileged user (like user "nobody", for example), and that the server
doesn't have permission to read or execute your script (that is done so hackers can't
execute CGI scripts from all over your machine -- only those which have explicit
permission to be read and executed by the web server's userid -- it's a feature, not
a problem).  To fix that, do chmod 777 on your script, or (preferably) chown it to
the userid the web server is using for CGI scripts.  With both that and a
"Content-type: text/html\n\n" header, you should get something on your browser.  It
would also be nice to have proper HTML tags, but most browsers don't insist on that.
All this, BTW, has nothing to with perl, but rather with Unix and CGI scripts.  Other
newsgroups, such as comp.infosystems.www.authoring.cgi, might be more helpful.



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

Date: Sun, 30 May 1999 04:59:07 GMT
From: tvn007@my-deja.com
Subject: Please help on RegXpression
Message-Id: <7iqgis$65r$1@nnrp1.deja.com>

Hi,

Would someone help me on regular expression ?

Here is the data:

########################

NAME    john bob tom tina matt charles;

################

I would like to have the output as follow:
(in other word, all names store in variable $all_name)

$all_name :  john bob tom tina matt charles

Thanks in advance,





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


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

Date: Sat, 29 May 1999 22:59:21 -0700
From: Tom Phoenix <rootbeer@redcat.com>
Subject: Re: Please help on RegXpression
Message-Id: <Pine.GSO.4.02A.9905292254080.13014-100000@user2.teleport.com>

On Sun, 30 May 1999 tvn007@my-deja.com wrote:

> Would someone help me on regular expression ?

Have you seen the books, docs, FAQs and such on REs?

> NAME    john bob tom tina matt charles;

> I would like to have the output as follow:
> (in other word, all names store in variable $all_name)
> 
> $all_name :  john bob tom tina matt charles

Here's one way:

    if ($data =~ /(john bob tom tina matt charles)/) {
	$all_name = $1;
    } else {
	die "Data didn't match pattern";
    }

Maybe you will want to generalize the pattern some. Good luck!

-- 
Tom Phoenix       Perl Training and Hacking       Esperanto
Randal Schwartz Case:     http://www.rahul.net/jeffrey/ovs/



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

Date: Sun, 30 May 1999 01:02:13 -0400
From: Bob Walton <walton@frontiernet.net>
To: "Mark R." <markro@nortelnetworks.com>
Subject: Re: Running a Background Process from CGI
Message-Id: <3750C655.15217A49@frontiernet.net>

Put & after the Unix command in the system call.

"Mark R." wrote:

> Hi there,
>
> I am pretty new to Perl so this may be an easy question.
>
> I am running Solaris 2.6 Perl 5.004.
>
> I have a Perl-CGI script which makes a call to another script (not a
> Perl script).  I want the script which is called from the Perl script
> to be run in the background.  Is there any easy way to do this?
> Presently, using the "system" command to make the call, the procedure
> must be fully completed before the user sees the response page.  The
> procedure that I want in the background eventually emails the user
> something.  The reason I want it in the background is because it
> updates web pages of data and depending on what the user selects, it
> could take a very long time.
>
> Any help would be greatly appreciated.
>
> Mark Robinson
> markro@nortelnetworks.com



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

Date: 30 May 1999 01:00:08 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Thanks man....HOWS THIS?
Message-Id: <slrn7l13ip.91v.fl_aggie@thepentagon.com>

On 28 May 1999 18:02:43 -0400, Uri Guttman <uri@sysarch.com>, in
<x7n1yohmyk.fsf@home.sysarch.com> wrote:
+ >>>>> "IRAA" == I R A Aggie <fl_aggie@thepentagon.com> writes:

+   IRAA> 'perldoc perl' is your friend. Once you have become familiar
+   IRAA> with it, and learnt how to 'grep' its wisdom, you'll be able to
+   IRAA> come up with your own solutions in a much more rapid fashion
+   IRAA> than relying upon usenet, making you look smart *and* handsome,
+   IRAA> causing the PHB to give you a raise and promotion (without any
+   IRAA> real reason), and having babes chase you down and beg you to be
+   IRAA> the father of their children...

+ hey, that doesn't happen to me and i am a close personal friend of the
+ perl docs!

*ssssssssssshhhhhhhhhhhhhhhh* If we can get the newbies to believe it,
they might actually do something productive!

James


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

Date: 29 May 1999 23:50:35 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Using a variable in a hash statement
Message-Id: <x7zp2nfc6s.fsf@home.sysarch.com>

>>>>> "RD" == Rick Delaney <rick.delaney@home.com> writes:

  RD> Uri Guttman wrote:
  >> 
  >> $num = 0 ;
  >> foreach $color ( @colors ) {
  >> print "$num     $color\n" ;
  >> }

  RD> Maybe you could use the typing-time saved by your frugal language to
  RD> test the code you bothered to type.  :-)  This prints

  RD> 0     Red
  RD> 0     Blue
  RD> 0     Green
  RD> 0     Yellow

  RD> The original poster actually created the menu this way, except he got it
  RD> right.

he had the wrong specs. it is better to have the user be confused by
this menu and have to guess the correct number range to enter. then it
truly will be their favorite color.

and i never test code anymore. it either works or it doesn't. 

:-)

uri


-- 
Uri Guttman  -----------------  SYStems ARCHitecture and Software Engineering
uri@sysarch.com  ---------------------------  Perl, Internet, UNIX Consulting
Have Perl, Will Travel  -----------------------------  http://www.sysarch.com
The Best Search Engine on the Net -------------  http://www.northernlight.com


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

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

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