[19798] in Perl-Users-Digest

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

Perl-Users Digest, Issue: 1993 Volume: 10

daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Oct 24 00:05:44 2001

Date: Tue, 23 Oct 2001 21:05:14 -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: <1003896314-v10-i1993@ruby.oce.orst.edu>
Content-Type: text

Perl-Users Digest           Tue, 23 Oct 2001     Volume: 10 Number: 1993

Today's topics:
    Re: Array of filehandles <iltzu@sci.invalid>
        Break <gte574u@prism.gatech.edu>
    Re: Break <tony_curtis32@yahoo.com>
    Re: Break <gte574u@prism.gatech.edu>
    Re: Break (Alan Barclay)
    Re: CPAN.pm complaining all the time <goldbb2@earthlink.net>
    Re: CPAN.pm complaining all the time (Lou Moran)
    Re: dynamic module <goldbb2@earthlink.net>
        Encrypting in one program and Decrypting in another pro (Anand Ramamurthy)
        executing a perl script <loudawg98@hotmail.com>
    Re: Form Validation, detecting a comma <goldbb2@earthlink.net>
    Re: Hash to Array? (Alan Barclay)
    Re: How to get perl working under windows 2000 ? <bmoore@door.net>
    Re: how to gzip a file (web)? <goldbb2@earthlink.net>
    Re: IO::Socket broken on win (Garry Williams)
        LISA 2001 - The Future of Systems Administration <mktgadm@usenix.org>
    Re: NEWBIE: Sorting a hash by value (Jay Tilton)
        Passing Command Line Parameters cgi file <asolleti@cisco.com>
    Re: Passing Command Line Parameters cgi file <tony_curtis32@yahoo.com>
        Passing multiple Arrays from a subroutine (Jeff Bush)
    Re: Passing multiple Arrays from a subroutine (Tad McClellan)
    Re: Passing multiple Arrays from a subroutine <f.galassi@e-mind.it>
        perl jobs <kireland@sprint.ca>
    Re: perl jobs <comdog@panix.com>
    Re: Perl Vs. Java <krishna.kumar@rhii.com>
    Re: Perl Vs. Java <krishna.kumar@rhii.com>
    Re: Perl Vs. Java <krishna.kumar@rhii.com>
    Re: RegEx question parsing filename from a path <tintin@snowy.calculus>
    Re: RegEx question parsing filename from a path (Tad McClellan)
        Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)

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

Date: 23 Oct 2001 23:33:51 GMT
From: Ilmari Karonen <iltzu@sci.invalid>
Subject: Re: Array of filehandles
Message-Id: <1003879895.25148@itz.pp.sci.fi>

In article <xa0B7.195608$K6.93126344@news2>, Clinton A. Pierce wrote:
>Yup.  Perl wants an identifier (i.e. a bareword) or a simple scalar 
>variable name for a filehandle in that spot.  Try:
>
>	$f=$ppm[$index];
>	print $f ".....";

A block works, too:

  print { $ppm[$index] } ".....";

But yes, indirect object syntax _is_ indeed ugly, no matter which way
you look at it.

-- 
Ilmari Karonen -- http://www.sci.fi/~iltzu/
"Get real!  This is a discussion group, not a helpdesk.  You post something,
we discuss its implications.  If the discussion happens to answer a question
you've asked, that's incidental."           -- nobull in comp.lang.perl.misc



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

Date: Tue, 23 Oct 2001 22:07:34 -0400
From: "Brady Doll" <gte574u@prism.gatech.edu>
Subject: Break
Message-Id: <9r57q0$3ri$1@news-int.gatech.edu>

Is there some way to exit early from a while, foreach, for, etc. loop like
the break statement in c?




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

Date: Tue, 23 Oct 2001 21:29:35 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: Break
Message-Id: <87u1wpkbxs.fsf@limey.hpcc.uh.edu>

>> On Tue, 23 Oct 2001 22:07:34 -0400,
>> "Brady Doll" <gte574u@prism.gatech.edu> said:

> Is there some way to exit early from a while, foreach,
> for, etc. loop like the break statement in c?

That's the "last" thing you should do.

-- 
Oh!  I've said too much.  Smithers, use the amnesia ray.


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

Date: Tue, 23 Oct 2001 22:56:27 -0400
From: "Brady Doll" <gte574u@prism.gatech.edu>
Subject: Re: Break
Message-Id: <9r5all$5ob$1@news-int.gatech.edu>


"Tony Curtis" <tony_curtis32@yahoo.com> wrote in message
news:87u1wpkbxs.fsf@limey.hpcc.uh.edu...
> >> On Tue, 23 Oct 2001 22:07:34 -0400,
> >> "Brady Doll" <gte574u@prism.gatech.edu> said:
>
> > Is there some way to exit early from a while, foreach,
> > for, etc. loop like the break statement in c?
>
> That's the "last" thing you should do.
>
> --
> Oh!  I've said too much.  Smithers, use the amnesia ray.

Thanks




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

Date: 24 Oct 2001 02:36:11 GMT
From: gorilla@elaine.furryape.com (Alan Barclay)
Subject: Re: Break
Message-Id: <1003890971.970249@elaine.furryape.com>

In article <9r57q0$3ri$1@news-int.gatech.edu>,
Brady Doll <gte574u@prism.gatech.edu> wrote:
>Is there some way to exit early from a while, foreach, for, etc. loop like
>the break statement in c?

last



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

Date: Tue, 23 Oct 2001 22:04:01 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: CPAN.pm complaining all the time
Message-Id: <3BD62191.79F0C4E7@earthlink.net>

Lou Moran wrote:
> 
> On a RH 6.2 machine whenever I run:
> 
> # perl -MCPAN -e 'install Some::Module'
> 
> CPAN complains that I don't have Net::FTP and could I install it
> really soon and if I just install Bundle::libnet everything will be
> fine, including Net::FTP.
> 
> Dutifully I have installed Bundle::libnet which CPAN admits I have
> everytime I try to install it (again,) but it always complains about
> Net::FTP but won't let me install Net::FTP!
> 
> Everything I ask of:
> 
> perl -MCPAN -e 'install Some::Module'
> 
> installs OK but it always wants me to hurry up and install Net::FTP.
> 
> What am I doing wrong and how can I fix it?

It's possible you have an old version of CPAN.  Maybe you can upgrade
it?

-- 
Klein bottle for rent - inquire within.


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

Date: Tue, 23 Oct 2001 22:39:15 -0400
From: ellem@optonline.net (Lou Moran)
Subject: Re: CPAN.pm complaining all the time
Message-Id: <ellem-2310012239150001@192.168.1.101>

In article <3BD62191.79F0C4E7@earthlink.net>, Benjamin Goldberg
<goldbb2@earthlink.net> wrote:

SNIP
> > 
> > What am I doing wrong and how can I fix it?
> 
> It's possible you have an old version of CPAN.  Maybe you can upgrade
> it?
Nope that's new too, kept complaining about that.  I won't even get into
what happened on my new 7.1 box... ugh!

-- 
TMTOWTDI but only some of them work


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

Date: Tue, 23 Oct 2001 21:58:23 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: dynamic module
Message-Id: <3BD6203F.FA2A0523@earthlink.net>

Lotto wrote:
> 
> Is there a way to "use" a module dynamically?  The sub I am writing
> (call it sub X) is passed the name of another sub (sub Y) that it is
> to run.  Sub X does not know what sub Y will be beforehand.  Sub Y is
> in a different file (module) from sub X.  Sub Y will also be called
> many times (it is in a loop). What would be the best way to go about
> this?

#!/usr/local/bin/perl -w
use strict;
use UNIVERSAL::require; # from CPAN

package MyPackageX;

sub X {
  my ($y, @other_args) = @_;
  my ($y_package) = $y =~ m/(.*)::/;
  $y_package->require;
  $y = do { no strict 'refs'; \&$y };
  for( 1 ... 1000 ) {
    $y->( @other_args );
  }
}
1;
__END__

And of course this would be called as
    MyPackageX::X( "some::package::Y", @foo );

-- 
Klein bottle for rent - inquire within.


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

Date: 23 Oct 2001 17:06:40 -0700
From: anand_ramamurthy@yahoo.com (Anand Ramamurthy)
Subject: Encrypting in one program and Decrypting in another program
Message-Id: <761041e6.0110231606.77f15731@posting.google.com>

I need help with encrypt & decrypt

1. I encrypt a text string (passwd) in one program (xx.pl) and store it
   in a config file (this this possible).
2. I read the config file in another program (yy.pl) later and decrypt
   the text string.

What is the best method I can use? Any specific Crypt module that will
help me to achieve this?


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

Date: Wed, 24 Oct 2001 01:51:16 +0000 (UTC)
From: "L S" <loudawg98@hotmail.com>
Subject: executing a perl script
Message-Id: <23f4a11ccb9b551f0ce133b92463f824.29743@mygate.mailgate.org>

Hi
I am a newbie at this and I was trying to configure squirrelMail and I needed
to run a conf.pl and I had no idea how to do this.  Can someone please help.
Thanks
Luis


-- 
Posted from dsl254-100-189.nyc1.dsl.speakeasy.net [216.254.100.189] 
via Mailgate.ORG Server - http://www.Mailgate.ORG


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

Date: Tue, 23 Oct 2001 20:50:59 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: Form Validation, detecting a comma
Message-Id: <3BD61073.2B1E7AE8@earthlink.net>

Stephen Graham wrote:
> 
> > But remember that, as Benjamin G. stated, you're not really
> > checking for valid e-mail addresses with your regex. Maybe for your
> > purposes the above is enough, but then again, maybe not.
> 
> Sure but getting into things like DNS lookups (if that's what RFC2822
> does) and so on is way over my head for Perl.

RFC2822 describes the syntax of a valid email address.  All valid email
addresses comply to RFC2822, though [since it *doesn't* do such things
as a DNS lookup and try to connect to the recipient's mailbox] there are
some email addresses which have valid syntax but which aren't valid in a
more absolute sence [ "no_such_user@example.com" has valid syntax
according to RFC2822, even if it isn't valid in the sense of you being
able to send mail there and get it to a recipient ]

Your regex rejects many email addresses which are syntactically valid.

> The script I've got seems to work fine for my purposes.

Even though it will declare some email address which are valid, invalid?

-- 
Klein bottle for rent - inquire within.


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

Date: 24 Oct 2001 03:32:09 GMT
From: gorilla@elaine.furryape.com (Alan Barclay)
Subject: Re: Hash to Array?
Message-Id: <1003894329.292132@elaine.furryape.com>

In article <3bd5820b@news.microsoft.com>,
Jürgen Exner <jurgenex@hotmail.com> wrote:
>You cannot sort hashes because there is no sequence in hashes. Hashes don't
>have a first, a last, or a next element. The very sentence "sorting a hash"
>is meaningless.

Unless you're using Tie::DxHash, which implements a hash which preseves
the insertion order.


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

Date: Wed, 24 Oct 2001 00:36:45 GMT
From: "Brett L. Moore" <bmoore@door.net>
Subject: Re: How to get perl working under windows 2000 ?
Message-Id: <x2oB7.15151$IR4.9338795@news1.denver1.co.home.com>

I tried the script from the command prompt and it worked fine (thanks!).
And, yes, it was a server issue.  When setting permissions in IIS under
Win2K, MS apparently makes a distinction between execute and script
permissions.  Of course, CGI requires execute permissions - not script as
one might expect.





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

Date: Tue, 23 Oct 2001 21:47:49 -0400
From: Benjamin Goldberg <goldbb2@earthlink.net>
Subject: Re: how to gzip a file (web)?
Message-Id: <3BD61DC5.799B92ED@earthlink.net>

Dave Naden wrote:
> 
> Hi Perls,
> 
> Does anyone have a simple example of reading a text file, compressing
> it into gzip format, and writing it back out?  Even better, anyone
> know how this is done in a CGI context?

Umm, call the gzip program?  If you really need to do it in-memory, you
can go to cpan, and search for a module which uses zlib compression.

#!/usr/local/bin/perl -w
use strict;
$| = 1;
binmode STDOUT;
print "Content-type: text/html\n";
print "Content-transfer-encoding: g-gzip\n";
print "\n";
{ exec "gzip", "-c", "/path/to/somefile.html" }
print "<HTML><HEAD><TITLE>Failed!</HEAD><BODY>\n";
print "exec 'gzip -c somefile' FAILED: $!\n";
print "</BODY></HTML>\n";
__END__

Other things to consider, open( HANDLE, "|gzip" ), or open2 or open3.

-- 
Klein bottle for rent - inquire within.


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

Date: Wed, 24 Oct 2001 02:10:50 GMT
From: garry@ifr.zvolve.net (Garry Williams)
Subject: Re: IO::Socket broken on win
Message-Id: <slrn9tc8p9.poo.garry@zfw.zvolve.net>

On Mon, 22 Oct 2001 22:21:26 GMT, Fe <f.galassi@e-mind.it> wrote:
> On Mon, 22 Oct 2001 19:11:51 GMT, garry@ifr.zvolve.net (Garry
> Williams) wrote:
> 
>>On Mon, 22 Oct 2001 06:25:27 -0400, Benjamin Goldberg
>><goldbb2@earthlink.net> wrote:
>>
>>What happened when you tried it? 
>>
>>    $ perl -MErrno -wle 'print EWOULDBLOCK()'
>>    Undefined subroutine &main::EWOULDBLOCK called at -e line 1.
>>    $ perl -MErrno=EWOULDBLOCK -wle 'print EWOULDBLOCK()' 
>>    11
>>    $ perl -MPOSIX -wle 'print EWOULDBLOCK()'     
>>    11
>>    $
>>
>>See the Errno manual page.  
> 
> EWOULDBLOCK, EINPROGRESS, ECONNRESET, ECONNABORTED, ESHUTDOWN, etc..
> they all die with :
> undefined subroutine (Errno) 
> not defined by vendor (POSIX 'errno_h')

I just downloaded and installed the latest ActiveState build and it
doesn't define these constants either: 

  $ perl -MPOSIX -wle 'print EWOULDBLOCK()'
  Your vendor has not defined POSIX macro EWOULDBLOCK, used at -e line 1
  $ perl -v

  This is perl, v5.6.1 built for MSWin32-x86-multi-thread
  (with 1 registered patch, see perl -V for more detail)

  Copyright 1987-2001, Larry Wall

  Binary build 629 provided by ActiveState Tool Corp.
  http://www.ActiveState.com
  Built 12:27:04 Aug 20 2001

Now I get it.  Errno doesn't define them either.  :(  Oh well...

-- 
Garry Williams


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

Date: Tue, 23 Oct 2001 16:08:13 -0700
From: Ann Tsai <mktgadm@usenix.org>
Subject: LISA 2001 - The Future of Systems Administration
Message-Id: <mktgadm-481E82.16081323102001@reader.news.uu.net>
Keywords: system administrator, system administrations, sys admin, UNIX, LINUX, OS, database, LISA, technical conference, seminar, tutorials, classes, invited talks, refereed papers, white papers, computers, operating systems, applications, hardware, software, SUN, Microsoft, windows, windows NT, symposium, security, databases, development, maintenance, troubleshooting, performance tuning, methodology, training, scaling, integration, programming, network, networking, technology, protocol, Perl, TCP/IP, hubs, routers, servers, CISCO, Oracle, Sybase, Open Systems

For fifteen years, LISA, The Systems Administration Conference, has been 
the leading forum for system administrators to meet, learn, and exchange 
ideas with one another on every aspect of computer and network 
management.  This year, LISA focuses on the latest in system and network 
security by including security focused tutorials, invited talks, and a 
special Network/Security track.

Register online by November 9 and SAVE up to $300.

15th Systems Administration Conference (LISA 2001)
December 2-7, 2001
San Diego, CA USA
http://www.usenix.org/events/lisa2001

Invited Speakers Include:

William LeFebvre, CNN Internet Technologies - JUST ADDED
"CNN.com: Facing a World Crisis

Greg Bear, multiple Hugo and Nebula Award winner, best-selling author of 
Eon, Slant & Darwin's Radio "Slime vs. Silicon"

Phil Cox, SystemExperts Corp
"Hardening Windows 2000"

John S. Flowers, nCircle Network Security
"Armoring the Next Wave of Security Technology"

Ernest Prabhakar, Apple
"Rebuilding the Digital Enterprise Around Internet Standards"


LISA also provides practical, professional-level education through over 
50 TUTORIALS, half of which are NEW.

* Real-World Intrusion Detection
* Network Security Profiles
* Hacking-Exposed: LIVE!
* An Introduction to Computer Security NEW!
* Practical Wireless IP Security and Connectivity
* Creating a Computer Security Incident Response Team NEW!
* UNIX Security Threats and Solutions NEW!
* Sendmail and Security NEW!
* System and Network Monitoring NEW!
* Forensic Computing

NEW!
SAGE, the System Adminstators Guild, is pleased to announce the launch 
of our certification exam. Be the first to experience the SAGE Core exam 
at LISA!  For more info visit us today at 
http://www.usenix.org/events/lisa2001

Attendees at LISA also receive a free copy of Selected Papers in System 
Administration, to be published by Wiley in December and edited by Eric 
Anderson, Mark Burgess, and Alva Couch.


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

Date: Wed, 24 Oct 2001 02:59:25 GMT
From: tiltonj@erols.com (Jay Tilton)
Subject: Re: NEWBIE: Sorting a hash by value
Message-Id: <3bd62dc4.333706083@news.erols.com>

On Tue, 23 Oct 2001 17:27:34 +0100, Jasper McCrea
<jasper@guideguide.com> wrote:

>Steve wrote:

>> sub supersort
>>  {
>>  if ($a > $b)
>>   {return -1;}
>>  if ($a < $b)
>>   {return 1;}
>>  else
>>   {return 0;}
>>  }
>
>Robert's Perl Tutorial seems to have rewritten the spaceship operator (
><=> ).
>Or am I missing something?

It's mentioned in the very next paragraph, followed by "we can
write the above much more easily as" then some very predictable
sample code.  Guess Steve didn't get that far before venturing
out on his own.


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

Date: Tue, 23 Oct 2001 17:18:46 -0700
From: Arun Solleti <asolleti@cisco.com>
Subject: Passing Command Line Parameters cgi file
Message-Id: <3BD608E6.F450AD7B@cisco.com>

Hi
I would like to know if there is a mechanism to send paramteres to a cgi
when run from command line. I send couple of paramteres using the GET
method when running the script on a browser. But if i want to run the
same script from command line then i'm not sure how to send the
paramters.

Thanks
Arun



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

Date: Tue, 23 Oct 2001 19:14:44 -0500
From: Tony Curtis <tony_curtis32@yahoo.com>
Subject: Re: Passing Command Line Parameters cgi file
Message-Id: <873d49lwqz.fsf@limey.hpcc.uh.edu>

>> On Tue, 23 Oct 2001 17:18:46 -0700,
>> Arun Solleti <asolleti@cisco.com> said:

> Hi I would like to know if there is a mechanism to send
> paramteres to a cgi when run from command line. I send
> couple of paramteres using the GET method when running
> the script on a browser. But if i want to run the same
> script from command line then i'm not sure how to send
> the paramters.

perldoc CGI

"offline mode"

hth
t
-- 
Oh!  I've said too much.  Smithers, use the amnesia ray.


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

Date: 23 Oct 2001 16:22:41 -0700
From: madhackergoogle@yahoo.com (Jeff Bush)
Subject: Passing multiple Arrays from a subroutine
Message-Id: <8edd7a6a.0110231522.35588f6a@posting.google.com>

I have done my best to follow the documentation regarding passing by
reference and arrays.  I have written the following test code, which
works BTW, but I wanted to verify that it works because it should
work.

Thanks.


--
--

#!/usr/local/bin/perl -w

## Pass Multiple Arrays

sub getModifyGroupMembers {
    my ($array1Ref,$array2Ref);
    my (@array1, @array2);
    my ($name);
    $name = "testName";
    $array1[0] = "Hi";
    $array1[1] = "Hi";
    $array1[2] = "Hi";
    $array2[0] = "Bye";
    $array2[1] = "Bye";
    $array2[2] = "Bye";
    $array1Ref = \@array1;
    $array2Ref = \@array2;
    return ($name,$array1Ref,$array2Ref);
   
}

($gName,$addRef,$delRef) = &getModifyGroupMembers;

@membersAdd = @$addRef;
@membersDel = @$delRef;

print "Got name = $gName\n";
print "Got array1 = ", @membersAdd, "\n";
print "Got array2 = ", @membersDel, "\n";


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

Date: Wed, 24 Oct 2001 01:16:18 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: Passing multiple Arrays from a subroutine
Message-Id: <slrn9tc2ra.j3e.tadmc@tadmc26.august.net>

Jeff Bush <madhackergoogle@yahoo.com> wrote:

>I have done my best to follow the documentation regarding passing by
>reference and arrays.  I have written the following test code, which
>works BTW, but I wanted to verify that it works because it should
>work.


You got it right.

I'll add some comments not related to refs and arg passing though.


>#!/usr/local/bin/perl -w

   #!/usr/local/bin/perl -w
   use strict;


>## Pass Multiple Arrays
>
>sub getModifyGroupMembers {
>    my ($array1Ref,$array2Ref);
>    my (@array1, @array2);
>    my ($name);
>    $name = "testName";
>    $array1[0] = "Hi";
>    $array1[1] = "Hi";
>    $array1[2] = "Hi";
>    $array2[0] = "Bye";
>    $array2[1] = "Bye";
>    $array2[2] = "Bye";

You can declare and initialize in a single statement if you like:

   my $name = 'testName';

   my @array1 = qw/ Hi Hi Hi /;
   my @array2 = qw/ Bye Bye Bye /;


>    $array1Ref = \@array1;
>    $array2Ref = \@array2;
>    return ($name,$array1Ref,$array2Ref);


The temporary variables are not needed, you can return the refs directly:

   return ($name, \@array1, \@array2);


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


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

Date: Wed, 24 Oct 2001 01:48:53 GMT
From: Fe <f.galassi@e-mind.it>
Subject: Re: Passing multiple Arrays from a subroutine
Message-Id: <2g4ctt8mmpbp7jkh5dicvrv5acvh938m3r@4ax.com>

On 23 Oct 2001 16:22:41 -0700, madhackergoogle@yahoo.com (Jeff Bush)
wrote:

it's "ok", yet you may want to consider :
1) you dont need temp vars to create and dereference references
2) &function_call is the old syntax and now it has a magical meaning,
you should use function_call() .... perldoc perlsub
3) you dont need subscripts to initialize arrays, you can use
the form @array = ( value1, value2, value3 ....);
also, since your arrays store the same value many times you can use
the x operator in list context, enclosing the first operand in
parentheses ....perldoc perlop
4) you can merge my var declarations and initializations
5) you may even use anonymous array constructor []

sub getModifyGroupMembers {
	my $name = 'testName';
	my @array1 = ('Hi') x 3;
	my $array2Ref = [ ('Bye') x 3 ];
	return $name, \@array1, $array2Ref;
}

my ($gName,$addRef,$delRef) = getModifyGroupMembers();

print "Got name = $gName\n";
print "Got array1 = ", @$membersAdd, "\n";
print "Got array2 = ", @$membersDel, "\n";

>#!/usr/local/bin/perl -w
>
>## Pass Multiple Arrays
>
>sub getModifyGroupMembers {
>    my ($array1Ref,$array2Ref);
>    my (@array1, @array2);
>    my ($name);
>    $name = "testName";
>    $array1[0] = "Hi";
>    $array1[1] = "Hi";
>    $array1[2] = "Hi";
>    $array2[0] = "Bye";
>    $array2[1] = "Bye";
>    $array2[2] = "Bye";
>    $array1Ref = \@array1;
>    $array2Ref = \@array2;
>    return ($name,$array1Ref,$array2Ref);
>   
>}
>
>($gName,$addRef,$delRef) = &getModifyGroupMembers;
>
>@membersAdd = @$addRef;
>@membersDel = @$delRef;
>
>print "Got name = $gName\n";
>print "Got array1 = ", @membersAdd, "\n";
>print "Got array2 = ", @membersDel, "\n";



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

Date: Tue, 23 Oct 2001 20:51:28 -0400
From: "Kevin" <kireland@sprint.ca>
Subject: perl jobs
Message-Id: <tgoB7.213$SE4.3239@newscontent-01.sprint.ca>

Can anyone please tell me there is a job board for perl jobs? Preferrably
jobs in Canada?





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

Date: Tue, 23 Oct 2001 21:08:17 -0400
From: brian d foy <comdog@panix.com>
Subject: Re: perl jobs
Message-Id: <comdog-A84CD1.21081723102001@news.panix.com>

In article <tgoB7.213$SE4.3239@newscontent-01.sprint.ca>, "Kevin" 
<kireland@sprint.ca> wrote:

> Can anyone please tell me there is a job board for perl jobs? Preferrably
> jobs in Canada?

http://jobs.perl.org
http://lists.perl.org

-- 
brian d foy <comdog@panix.com> - Perl services for hire
CGI Meta FAQ - http://www.perl.org/CGI_MetaFAQ.html
Troubleshooting CGI scripts - http://www.perl.org/troubleshooting_CGI.html



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

Date: Wed, 24 Oct 2001 02:54:17 GMT
From: "Krishna Kumar" <krishna.kumar@rhii.com>
Subject: Re: Perl Vs. Java
Message-Id: <t3qB7.61146$gT6.31746603@news1.rdc1.sfba.home.com>

I am a great fan of Perl, hence the post in this newsgroup.

I am trying to convince my manager's to retract their decision.

Thanks for your support.

"Bart Lateur" <bart.lateur@skynet.be> wrote in message
news:6aaattkmlojnb44aribocao63hd0unt8i9@4ax.com...
> Krishna Kumar wrote:
>
> >No I think the assumption is Java is easier to learn than Perl.
>
> Maybe... but Java programs will mùost likely be a lot more verbose than
> Perl programs.
>
> And BASIC is easier to learn than Java... so let's do it in BASIC?
>
> I think not.
>
> I think that Perl is more powerful than Java. More... to the point. And
> I'm currently in the process of learning Java.
>
> >Unfortunately Perl needs to hire some marketing folks from M$ or Sun as
some
> >of our managers had not even heard of Perl until this discussion cropped
up.
>
> Not M$. They seems to be determined to kill of Java. See the article on
> M$'s attempts of sabotaging Java, a few years  ago, and their current
> decision of not including the Java Runtime in their new OS, XP.
>
>
> <http://www.javacoffeebreak.com/articles/microsoftjava/index.html>
> <http://www.wired.com/news/business/0,1367,45338,00.html>
>
> The decision from Microsoft to drop Java like a hot potato, is simply
> because they were not allowed to "embrace and extend" it. They ARE
> allowed to include a very recent Java standards compatible engine.
>
> Do you want the same faith for Perl?
>
> --
> Bart.




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

Date: Wed, 24 Oct 2001 02:55:14 GMT
From: "Krishna Kumar" <krishna.kumar@rhii.com>
Subject: Re: Perl Vs. Java
Message-Id: <m4qB7.61155$gT6.31749512@news1.rdc1.sfba.home.com>

I do not know the logic behind their assumption.

But I will certainly pass this on.

Thanks

"Peter Hickman" <peterhi@shake.demon.co.uk> wrote in message
news:1003869767.16448.0.nnrp-01.9e980a61@news.demon.co.uk...
> "Krishna Kumar" <krishna.kumar@rhii.com> wrote in message
> news:u4VsWT0WBHA.169@hqp_news_nt1.corp.rhalf.com...
> > No I think the assumption is Java is easier to learn than Perl.
>
> I would dispute that vigorously. I can program Java, Perl, C, Fortran,
COBOL
> and
> many more but Java is harder to learn and slower to develop in than Perl.
> Why do you
> think Perl programmers are paid less than Java programmers - because it is
> easier
> to turn someone into a productive programmer in Perl than in Java.
>
>
>




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

Date: Wed, 24 Oct 2001 02:58:48 GMT
From: "Krishna Kumar" <krishna.kumar@rhii.com>
Subject: Re: Perl Vs. Java
Message-Id: <I7qB7.61180$gT6.31759124@news1.rdc1.sfba.home.com>

The whole thing sparked off in our org. only because I wanted write a Perl
script for some text processing.

I am now even more convinced that for what I was planning to use Perl it is
definitely the right choice.


"brian d foy" <comdog@panix.com> wrote in message
news:comdog-8F64AD.01374623102001@news.panix.com...
> In article <PO$b#qyWBHA.169@hqp_news_nt1.corp.rhalf.com>, "Krishna
> Kumar" <krishna.kumar@rhii.com> wrote:
>
> > Folks at my work are talking about using Java as a standard instead of
Perl.
> >
> > I have no knowledge of Java to agree or disagree with this.
> >
> > They are trying to convince me that Java can do everything that Perl
can.
>
> talking about which tool to use before you know what you are
> building is a bit silly.  figure out what you want to do then
> choose the tool that makes the most sense for that problem.
>
> and, despite this seemingly tolerant perspective, i have never
> chosen Java as the right tool for the job.  i've chosen things
> other than Perl, including C, Tcl, Python, and even sh, but never
> Java.  that might be because i haven't worked on the problems
> where Java's strengths prevail.  as i understand it Java has
> some kickass XML stuff, for instance.  if you are in one of
> those problem domains, Java might be the right choice.
>
> so, walk softly and carry a big toolbox. :)
>
> --
> brian d foy <comdog@panix.com> - Perl services for hire
> CGI Meta FAQ - http://www.perl.org/CGI_MetaFAQ.html
> Troubleshooting CGI scripts - http://www.perl.org/troubleshooting_CGI.html
>




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

Date: Wed, 24 Oct 2001 08:13:09 +1000
From: "Tintin" <tintin@snowy.calculus>
Subject: Re: RegEx question parsing filename from a path
Message-Id: <2ZlB7.3$9T7.125051@news.interact.net.au>


"John Menke" <jmenke@scsnet.csc.com> wrote in message
news:3a2d73ac.0110231259.3a68e254@posting.google.com...
> I need to extract the filename from a path statement
>
> I will have something like this:
> "C:\ORACLE\ORADATA\DBNAME\TEMP01.DBF" in a variable named $filepath
>
> how do I get just the TEMP01.DBF into a variable?

perldoc File::Basename




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

Date: Tue, 23 Oct 2001 23:11:25 GMT
From: tadmc@augustmail.com (Tad McClellan)
Subject: Re: RegEx question parsing filename from a path
Message-Id: <slrn9tbmv0.ifu.tadmc@tadmc26.august.net>

John Menke <jmenke@scsnet.csc.com> wrote:

>I need to extract the filename from a path statement

   perldoc File::Basename


-- 
    Tad McClellan                          SGML consulting
    tadmc@augustmail.com                   Perl programming
    Fort Worth, Texas


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

Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin) 
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>


Administrivia:

The Perl-Users Digest is a retransmission of the USENET newsgroup
comp.lang.perl.misc.  For subscription or unsubscription requests, send
the single line:

	subscribe perl-users
or:
	unsubscribe perl-users

to almanac@ruby.oce.orst.edu.  

To submit articles to comp.lang.perl.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 V10 Issue 1993
***************************************


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