[11951] in Perl-Users-Digest
Perl-Users Digest, Issue: 5551 Volume: 8
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Mon May 3 14:07:14 1999
Date: Mon, 3 May 99 11:00:19 -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, 3 May 1999 Volume: 8 Number: 5551
Today's topics:
Re: "learning perl" does not seem to be written well <aqumsieh@matrox.com>
Re: Can I get multiple line or cut/paste input? <aqumsieh@matrox.com>
Re: Can I get multiple line or cut/paste input? (Larry Rosler)
comparing and contrasting dir trees <tony_barratt@talk21.com>
Re: Finding x^y? <uri@sysarch.com>
Re: Finding x^y? (I R A Aggie)
Re: Finding x^y? <tchrist@mox.perl.com>
Re: Finding x^y? <tchrist@mox.perl.com>
Re: Finding x^y? <tchrist@mox.perl.com>
Re: Finding x^y? (Larry Rosler)
Re: Finding x^y? (Larry Rosler)
Re: Garbage Collection Problem (Steve Linberg)
Re: Help with Reading/descending directories... (Steve Linberg)
Re: Is this a bug? (Andrew Allen)
Re: Is this the best way to get a substring? <jeromeo@atrieva.com>
Re: need user to be able to submit files from browser <flavell@mail.cern.ch>
NT - Attaching to a different domain mirak63@yahoo.com
perl accessing a string created by my C function - memo tedsung6674@my-dejanews.com
Re: Perl in the workplace <cassell@mail.cor.epa.gov>
Perl/GTK+ <dv@iname.com>
Re: Perl/GTK+ (I R A Aggie)
Perldoc if installing modul in a user directory one1999@my-dejanews.com
Re: sending email <tchrist@mox.perl.com>
Re: Stumped on Regex routine <aqumsieh@matrox.com>
Re: The docs as talking books (was Re: newbie with a "h <aqumsieh@matrox.com>
Re: Thumbnails from JPEGs <cassell@mail.cor.epa.gov>
Using 'Require' in ASP <jalil@corp.home.net>
Re: What's the difference between Perl and CGI? <cassell@mail.cor.epa.gov>
Re: Who is Just another Perl hacker? <dgris@moiraine.dimensional.com>
Special: Digest Administrivia (Last modified: 12 Dec 98 (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Mon, 3 May 1999 12:16:15 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: "learning perl" does not seem to be written well
Message-Id: <x3y7lqqnn75.fsf@tigre.matrox.com>
dha@panix.com (David H. Adler) writes:
> >Therefore a Perl book which addresses the non-programmer has not
> >been written yet, AFAIK.
>
> This, however is *quite* true.
Well, maybe. I really thought the Perl5 Interactive book (by Jon
Orwant, published by Waite Group) was pretty good, and simple. It
showed you lots of examples *WITH THEIR OUTPUTS* and an explanation of
each. This is something which the Camel lacks (hint hint).
But, I had quite some programming experience before I read it, so I
can't really make a definitive statement. But I found it very simple
and clear (except for some typos here and there).
my $input = $0.02;
Ala
------------------------------
Date: Mon, 3 May 1999 12:35:40 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Can I get multiple line or cut/paste input?
Message-Id: <x3y4slunmar.fsf@tigre.matrox.com>
Rick Delaney <rick.delaney@home.com> writes:
> $/ = "...\n";
This will stop reading as long as there are three dots followed by a
\n. The dots do not have to be at the beginning of the line.
Too bad $/ can't take a regexp or else one would've been able to do:
$/ = /^...$/;
<sigh>
As The Larry said :
"Hey, I had to let awk be better at *something*"
------------------------------
Date: Mon, 3 May 1999 10:51:01 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Can I get multiple line or cut/paste input?
Message-Id: <MPG.119781e48606ec5b9899a2@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <x3y4slunmar.fsf@tigre.matrox.com> on Mon, 3 May 1999
12:35:40 -0400 , Ala Qumsieh <aqumsieh@matrox.com> says...
> Rick Delaney <rick.delaney@home.com> writes:
> > $/ = "...\n";
>
> This will stop reading as long as there are three dots followed by a
> \n. The dots do not have to be at the beginning of the line.
>
> Too bad $/ can't take a regexp or else one would've been able to do:
>
> $/ = /^...$/;
So do this:
$/ = "\n...\n";
and stick the first newline back onto the input if necessary.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 3 May 1999 19:13:21 +0200
From: "tony barratt" <tony_barratt@talk21.com>
Subject: comparing and contrasting dir trees
Message-Id: <7gklbl$bu8$1@xenon.inbe.net>
Hi List,
I have to create a perl prog that descends from a given point in a file
system, say /usr recursively stat-ing the files and dirs, it finds on the
way down.
So it generates a list of files/dirs with any of 'mode, ino, nlink, uid,
gid, size, atime, mtime, checksum' selectable.
And then later drop back to that file system and see in anything has
changed. So i guess i need to store the result of the first scan in a file.
So in the time honoured fashion i looked round to something to snarf, and
maybe
dircompare.p from Perl5 Complete McGraw Hill 1998 (a kewl book) is a good
start.
it's intended to be invoked thus:
# perl dircompare.p dir1 dir2
ie two parameters each a directory.
But i want to in the 1st instance generate a report on what a recursive stat
finds (given a dir to descend from). But saving a hideously complicated
nested hash thing to file and fetching it back later makes me a little
nervous and uncertain.
I there maybe an easy way?
TIA
Tony
<dircompare.p>
use strict;
use DirHandle;
%G::StatElements =
(
'dev' => 0, 'ino' => 1, 'mode' => 2, 'nlink' => 3,
'uid' => 4, 'gid' => 5, 'rdev' => 6, 'size' => 7,
'atime' => 8, 'mtime' => 9, 'ctime' => 10, 'blksize' => 11,
'blocks' => 12
);
# @G::WantedElements = ('mode','nlink','uid','gid','size','atime','mtime');
@G::WantedElements = ('size');
my $firstRoot = $ARGV[0];
my $secondRoot = $ARGV[1];
die "Need Two Arguments!\n" if (@ARGV != 2);
filesystemDiff($firstRoot, $secondRoot);
sub filesystemDiff
{
my ($root1, $root2) = @_;
print "Comparing $root1 to $root2:\n";
print "---------------------------------\n";
my $diffs = diff($root1,$root2, 1);
print @$diffs;
print "Comparing $root2 to $root1:\n";
print "---------------------------------\n";
$diffs = diff($root2,$root1, 1);
print @$diffs;
}
sub diff
{
my ($dir1, $dir2, $reclevel) = @_;
my $diffs = [];
my $type1 = _type($dir1);
my $type2 = _type($dir2);
if ($type2 eq 'notexist')
push(@$diffs, "\t" x $reclevel . "$dir2 does not exist\n");
}
elsif ($type1 ne $type2)
{
push(@$diffs,
"\t" x $reclevel . "$dir1 is '$type1' => $dir2 is '$type2'\n");
}
elsif ($type1 eq 'file')
my $diff = statDiff($dir1, $dir2, $reclevel);
push (@$diffs, $diff) if ($diff);
}
elsif ($type1 eq 'directory')
{
my $diff = statDiff($dir1,$dir2, $reclevel);
my $dh = new DirHandle($dir1);
my @filesAndDirs = $dh->read();
@filesAndDirs = sort by_type @filesAndDirs;
my $file;
foreach $file (@filesAndDirs)
{
next if ($file eq '.');
next if ($file eq '..');
my $diff = diff("$dir1/$file", "$dir2/$file", $reclevel+1);
push(@$diffs, @$diff) if (@$diff);
}
}
return($diffs);
}
sub statDiff
{
my ($element1, $element2, $reclevel) = @_;
my $xx;
my $diffs1;
my (@stat1) = stat($element1);
my (@stat2) = stat($element2);
foreach $xx (@G::StatElements{@G::WantedElements})
{
if ($stat1[$xx] ne $stat2[$xx])
return( "\t" x $reclevel . "$element1 => $element2\n" );
}
}
return(0);
}
sub by_type
{
my $atype = _type($a);
my $btype = _type($b);
return(1) if (($atype eq 'file') && ($btype ne 'file'));
return(0) if (($atype ne 'file') && ($btype eq 'file'));
return($a cmp $b);
}
sub _type
{
my ($entry) = @_;
return
(-d $entry )? 'directory' :
(-f $entry )? 'file' :
(!-e $entry)? 'notexist' :
'unknown'
);
}
</dircompare.p>
------------------------------
Date: 03 May 1999 12:04:52 -0400
From: Uri Guttman <uri@sysarch.com>
Subject: Re: Finding x^y?
Message-Id: <x7vhea2l7f.fsf@home.sysarch.com>
>>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:
LR> [Posted and a courtesy copy sent.]
LR> In article <linberg-0305991049180001@ltl1.literacy.upenn.edu> on Mon, 03
LR> May 1999 10:49:18 -0400, Steve Linberg <linberg@literacy.upenn.edu>
LR> says...
>> In article <372D7047.3951CD68@wwa.comx>, JWefler <wef@wwa.comx> wrote:
LR> ...
>> > $answer = $y ^ $x;
>> >
>> > Help me with the syntax to perform a (x to the yth power)....
>>
>> $answer = $y ** $x;
LR> $answer = $x ** $y;
well the jerk had $y ^ $x so maybe $y ** $x would be correct for that
expression. your way is standard for the generic example.
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: 3 May 1999 16:09:03 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Finding x^y?
Message-Id: <slrn7irilr.mo3.fl_aggie@stat.fsu.edu>
On Mon, 03 May 1999 10:04:22 +0000, JWefler
<wef@wwa.comx>, in <372D74A6.9E85DA46@wwa.comx> wrote:
[cc'd and posted]
+ I guess I should have made this more clear, since you are obviously
+ suffering from some kind of brain dysfunction or psychological
+ disorder... Take the "x" off of the end of my e-mail address and shove
+ it up your tightly wound arsehole!
Beggars can't be choosers, bud. But since you want to be so...rude about
things, here's your unmunged address:
wef@wwa.com
Maybe one of the address trollers will pick up. Maybe I'll just add it
to my sig in places I *know* address trollers are at work...
+ Lookie here, a literate quaker answered my question.... Ah... time to
+ unsubscribe...
I would suggest you give up perl. Your attitude is most unperlish.
Oh, and have a nice day...
James
------------------------------
Date: 3 May 1999 10:40:51 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Finding x^y?
Message-Id: <372dd193@cs.colorado.edu>
[courtesy cc of this posting sent to web@wwa.com author via email]
Using Mozilla 4.51 [en] (Win98; U), in comp.lang.perl.misc,
JWefler <wef@wwa.com> writes:
:Why can't I find this in a FAQ or book?
:
:$answer = $y ^ $x;
Because it's not a FAQ. It's just a simple operator, right
out of the perlop manpage. It's just basic C programming.
If you want BASIC, you know where to find it.
--tom
--
"I just found out that the brain is like a computer. If that's true, then
there really aren't any stupid people. Just people running Windows
He who hasn't hacked assembly language as a youth has no
heart. He who does so as an adult has no brain.
------------------------------
Date: 3 May 1999 10:43:59 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Finding x^y?
Message-Id: <372dd24f@cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
Daniel Grisinger <dgris@moiraine.dimensional.com> writes:
:I tried to mail you an answer...
That's an illegal posting. The spec says it has to be valid.
Which means news servers can drop his article in the bit bucket.
Everyone should.
Address munging == giving-in/appeasement
Just say no. And put the mungers' addresses in your headers. :-)
--tom
--
_doprnt(pat, args, &fakebuf); /* what a kludge */
--Larry Wall, from util.c in the v5.0 perl distribution
------------------------------
Date: 3 May 1999 10:45:48 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: Finding x^y?
Message-Id: <372dd2bc@cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc,
Uri Guttman <uri@sysarch.com> writes:
:or rather another poster who munges his email address. so here for all
:those spam generators is the real thing:
:
:wef@wwa.com
Oh, put it in the headers. It works better. Or maybe a
database of converted demunged versions. It would make
a nice web page.
--tom
--
Hackers should be judged by their hacking, not bogus criteria such as degrees,
age, race or position. -- From _Hackers_ heroes of the computer revolution --
------------------------------
Date: Mon, 3 May 1999 10:44:20 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Finding x^y?
Message-Id: <MPG.1197805176a008a29899a1@nntp.hpl.hp.com>
[Posted and a courtesy copy mailed.]
In article <x7vhea2l7f.fsf@home.sysarch.com> on 03 May 1999 12:04:52 -
0400, Uri Guttman <uri@sysarch.com> says...
> >>>>> "LR" == Larry Rosler <lr@hpl.hp.com> writes:
> LR> In article <linberg-0305991049180001@ltl1.literacy.upenn.edu> on Mon, 03
> LR> May 1999 10:49:18 -0400, Steve Linberg <linberg@literacy.upenn.edu>
> LR> says...
> >> In article <372D7047.3951CD68@wwa.comx>, JWefler <wef@wwa.comx> wrote:
> LR> ...
> >> > $answer = $y ^ $x;
> >> >
> >> > Help me with the syntax to perform a (x to the yth power)....
> >>
> >> $answer = $y ** $x;
>
> LR> $answer = $x ** $y;
>
> well the jerk had $y ^ $x so maybe $y ** $x would be correct for that
> expression. your way is standard for the generic example.
Well, nothing! 'My way' is correct for this specific example, too.
Subject: Re: Finding x^y?
Request (see above): Help me with the syntax to perform a (x to the yth
power)....
Just because the poster's guess at the solution was wrong doesn't make
him/her a jerk, and doesn't mean that a symmetrical but wrong response
should go uncorrected.
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 3 May 1999 10:54:23 -0700
From: lr@hpl.hp.com (Larry Rosler)
Subject: Re: Finding x^y?
Message-Id: <MPG.119782af21fcfb029899a3@nntp.hpl.hp.com>
In article <MPG.1197805176a008a29899a1@nntp.hpl.hp.com> on Mon, 3 May
1999 10:44:20 -0700, Larry Rosler <lr@hpl.hp.com> says...
...
> Just because the poster's guess at the solution was wrong doesn't make
> him/her a jerk...
I'm wrong. I looked at the other branch of this thread, and *he* is
indeed a jerk. :-(
--
(Just Another Larry) Rosler
Hewlett-Packard Company
http://www.hpl.hp.com/personal/Larry_Rosler/
lr@hpl.hp.com
------------------------------
Date: Mon, 03 May 1999 12:45:29 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Garbage Collection Problem
Message-Id: <linberg-0305991245290001@ltl1.literacy.upenn.edu>
In article <2IjX2.160$Ca.50633@PM01NEWS>, "Norman Bunn"
<norman.bunn@mci.com> wrote:
> I am submitting a form to a perl program which has been running fine until
> recently. On rare occasions, it picks up data from a previously submitted
> form. I'm not sure how it is doing this since each time a new process is
> launched. This is running under Perl 5.004_2 under NT 4.0 SP4. Any ideas
> on what could be causing this?
Sure your version is correct?
In any event, it sounds like your server is misbehaving. Be sure you use
CGI.pm as documented and initialize your variables when the script begins,
especially if you are running under mod_perl or something similar.
Code samples might help specific diagnoses.
--
Steve Linberg, Systems Programmer &c.
National Center on Adult Literacy, University of Pennsylvania
email: <linberg@literacy.upenn.edu>
WWW: <http://www.literacyonline.org>
------------------------------
Date: Mon, 03 May 1999 12:43:14 -0400
From: linberg@literacy.upenn.edu (Steve Linberg)
Subject: Re: Help with Reading/descending directories...
Message-Id: <linberg-0305991243140001@ltl1.literacy.upenn.edu>
In article <7gkg3n$421$1@nnrp1.dejanews.com>, abrinson@my-dejanews.com wrote:
> I am trying to perform a simple file check for directories.
>
> The end goal is to create a mechanism for my program do descend directories
> and search for .html files.
It already exists. Why reinvent the wheel?
use File::Find.
--
Steve Linberg, Systems Programmer &c.
National Center on Adult Literacy, University of Pennsylvania
email: <linberg@literacy.upenn.edu>
WWW: <http://www.literacyonline.org>
------------------------------
Date: 3 May 1999 15:55:24 GMT
From: ada@fc.hp.com (Andrew Allen)
Subject: Re: Is this a bug?
Message-Id: <7gkgtc$k7d$1@fcnews.fc.hp.com>
silver (silver@silverchat.com) wrote:
[recap: references to the same "value" from a tied hash are different]
<snip>
I wouldn't consider this a bug. After all, after you've tied a hash,
every hash access is a function call. I wouldn't complain if the
"defined" function returned a distinct value each time I called it.
Andrew
------------------------------
Date: Mon, 03 May 1999 08:55:11 -0700
From: Jerome O'Neil <jeromeo@atrieva.com>
To: Ronald J Kimball <rjk@linguist.dartmouth.edu>
Subject: Re: Is this the best way to get a substring?
Message-Id: <372DC6DF.1B9DAA3B@atrieva.com>
Ronald J Kimball wrote:
> Would the following invented exchange match your philosophy?
>
> New programmer: How do I open a file?
Hrmmmm.... <Much muttering to my coffee cup...>
No. Err.. Yes. Sorta.
> > We shouldn't be answering questions that weren't asked
>
> There is a fatal flaw with that guideline, which is that new programmers
> often _don't know the right question to ask_.
Yes, this is true. I guess I don't like to speculate on the experience
of any one who posts here, although, IIRC, this guy did say "newbie." I
will confess that perhaps my spartan approach isn't always the most
divine way of doing things, although I still prefer KISS for any
general problem. However, if it keeps the peace, I'll try to provide
good technique as well as clear examples.
--
Jerome O'Neil, Operations and Information Services
Atrieva Corporation, 600 University St., Ste. 911, Seattle, WA 98101
jeromeo@atrieva.com - Voice:206/749-2947
The Atrieva Service: Safe and Easy Online Backup http://www.atrieva.com
------------------------------
Date: Mon, 3 May 1999 18:13:35 +0200
From: "Alan J. Flavell" <flavell@mail.cern.ch>
Subject: Re: need user to be able to submit files from browser
Message-Id: <Pine.HPP.3.95a.990503180839.14031K-100000@hpplus01.cern.ch>
On Mon, 3 May 1999, Matt Baker wrote:
> how is this done? I know netscape has an ftp feature built into the browser
> but I need a script (or maybe its just an html thing) that will allow
> retrieval of a file(specified by the user) from the users machine.
You seem to be looking (in the wrong place!) for a PUT handler.
See
http://sunsite.doc.ic.ac.uk/packages/apache/docs/misc/FAQ.html#putsupport
and http://www.apacheweek.com/features/put
Please direct your WWW-related queries to a WWW-related group.
c.l.p.m is meant to be for Perl language questions.
------------------------------
Date: Mon, 03 May 1999 16:24:50 GMT
From: mirak63@yahoo.com
Subject: NT - Attaching to a different domain
Message-Id: <372dccc9.13521004@news.mindspring.com>
Hello,
I am able to use the "net use" command to attach to a server in a
different domain using "net use t: \\SERVER\D$ /user:DOMAIN\USERNAME"
This will allow me to connect to a server in a different domain as a
user in that domain. Now for the question.
Can I do this using Win32::
I have tried using the NetResource hash but am not having much luck.
Thanks,
Karim
------------------------------
Date: Mon, 03 May 1999 17:11:38 GMT
From: tedsung6674@my-dejanews.com
Subject: perl accessing a string created by my C function - memory management issues
Message-Id: <7gklc5$8ud$1@nnrp1.dejanews.com>
Hi,
I have written a C extension to perl which takes a perl string
as a parameter and this string gets filled by my function.
Since I don't always know how big my string is going to be,
I have been using a hack - I just make my perl string very big.
What I'd like to do is to be able to a string in my C function
that the perl memory manager will know about (and hence clean up). Currently,
I declare a big string in perl and pass it as a parameter to my function:
## perl code - and my hack to make a large string
$foovar = " " x 1000;
foo::my_func( $foovar );
My C function myfunc does something like this
int my_func( char *foop )
{
strcpy( foop, "BIG STRING" );
return 0;
}
I'd like to do something like this if possible:
## perl code
foo::my_func( $foovar );
My C function myfunc does something like this
int my_func( char *foop )
{
foop = (char *)perl_malloc( 100 );
strcpy( foop, "BIG STRING" );
return 0;
}
and then have Perl clean up foop. This will also make my perl
code alot cleaner. Is this possible and if so, how?
Thanks for your help.
Ted
int my_func( char *foop )
{
strcpy( foop, "BIG STRING" );
return 0;
}
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: Mon, 03 May 1999 10:11:19 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
To: sstarre@my-dejanews.com
Subject: Re: Perl in the workplace
Message-Id: <372DD8B7.C4CE1F7E@mail.cor.epa.gov>
[a courtesy cc sent via e-mail to the poster]
sstarre@my-dejanews.com wrote:
>
> I work for a large Fortune company, where use of Perl is a forbidden
> practice. There are two distinct camps - MIS, who mandates that all CGI will
> be done in VB-script (ack!), and two, engineers and scientists who use an
> ecclectic mix of languages. In my camp (the latter) a small band of us risk
> our employment daily and continue to write our CGI in Perl. Proabably less
> than 20 people in this company of over 20,000 use Perl. We download it and
> install it on our Suns, so largely we're safe from MIS probing which only
> (today) extends into the NT and VMS domains.
>
> They argue that as Perl is freely distributed, support isn't guaranteed and
> therfore it doesn't meet the corporate standards. In meetings, MIS refers to
> Perl jokingly as an avante guarde group of mavericks, unworthy of corporate
> consideration (they hold linux the same in the same regard). Ironically, many
> times when we ask them to write CGI for us, they tell us that VB SCript can't
> do what we're requesting (so we go off and do it in Perl ourselves).
Use the approach recommended in the FAQ. See perlfaq2, "Where can I buy
a commercial version of Perl?"
And point out the following:
[1] Support is now guaranteed.
www.ActiveState.com.PerlDirect [win32 & unix support]
www.PerlClinic.com [the Perl Clinic]
The Perl Clinic provides per-incident and annual support, so you can
blows wads of dough just like a *real* language! :-)
[2] Stable distributions are guaranteed. Perl maintains a `stable'
track
and the `bleeding edge' track. Separately. So the new version
isn't going to crash your system [unless your old code had some bad
thingies hidden in it]. Unlike, say, VB...
[3] Shrink-wrapped CDs are now available, if MIS would rather pay for
them than just download stuff.
[4] Actual source is available, if desired by either real programmers
or PHBs.
[5] Official bug reporting system built in, and really fast evaluation
and bug fixing, as opposed to the inertia and denial often seen in
*real* software companies.
[6] Perl is older than VB. With far better backward compatibility.
Ask MIS when the first usable version of VB was on the street.
[7] Some time when you get told that VBScript can't cut it, turn
around and show (in private to avoid embarrassing someone who can
help some day) that there is a short, fast, effective Perl answer.
[8] Remember that you're an outsider when you make this push. You're
outside official MIS. You're female. You're one of those weird
websters. So be aware that your word does not count as much as that
of the insiders. Don't burn any bridges you may need for tactical
retreats.
[9] Do not show any of the NT supporters any quotes by Tom Christiansen
about Windows or Bill Gates. :-)
> Do others find this kind of resistance to Perl at work? If so, were you able
> to make a case to management to at least allow it as a "2nd language"? Have
> you had to "go underground" to get your job done?
I'm lucky. I have the best boss I have ever encountered. Not only
does he trust me to do my work, but he *likes* Perl. Actually, he's
a better Perl programmer than I am (my opinion, not his). And he has
actually received a reply from Larry Wall (Himself). He even has a
linux/win32 network he has installed in his home. Not your typical
PHB.
I fought this kind of battle over a different subject at a previous
job, against an entrenched encampment. Suffice it to say that I won
a rather Pyrrhic victory and am no longer employed there.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior Computing Specialist phone: (541) 754-4468
mathematical statistician fax: (541) 754-4716
------------------------------
Date: Mon, 3 May 1999 11:02:38 -0500
From: "Darin Vanatta" <dv@iname.com>
Subject: Perl/GTK+
Message-Id: <925747905.080.66@news.remarQ.com>
Where can I get more info on using Perl with GTK+ for creating GNOME apps?
Thanks,
Darin
------------------------------
Date: 3 May 1999 16:47:26 GMT
From: fl_aggie@thepentagon.com (I R A Aggie)
Subject: Re: Perl/GTK+
Message-Id: <slrn7irkts.pgd.fl_aggie@stat.fsu.edu>
On Mon, 3 May 1999 11:02:38 -0500, Darin Vanatta
<dv@iname.com>, in <925747905.080.66@news.remarQ.com> wrote:
+ Where can I get more info on using Perl with GTK+ for creating GNOME apps?
I would suggest looking at CPAN for the GTK modules. Ah, here they are:
% perl -MCPAN -e shell
cpan> i /gtk/
Distribution KJALB/Gtk-0.1.16.tar.gz
Distribution KJALB/Gtk-Perl-0.5121.tar.gz
Good luck!
James - having problems getting the second one to compile cleanly
------------------------------
Date: Mon, 03 May 1999 16:01:14 GMT
From: one1999@my-dejanews.com
Subject: Perldoc if installing modul in a user directory
Message-Id: <7gkh88$53j$1@nnrp1.dejanews.com>
If I install a modul (e.g. Mail::POP3Client) in my own user directory, how
can I read the documentation? I am not an admin. So I can't install the
module in the perl directory.
When typing "perldoc Mail::POP3Client", the result is:
can't open /bin/Mail/POP3Client.pod: Not a directory at /usr/bin/pod2man line
39 /tmp/perldoc1.19629 (END)
--
Christian
-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own
------------------------------
Date: 3 May 1999 10:51:33 -0700
From: Tom Christiansen <tchrist@mox.perl.com>
Subject: Re: sending email
Message-Id: <372dd415@cs.colorado.edu>
[courtesy cc of this posting sent to cited author via email]
In comp.lang.perl.misc, "Terra Landry" <terral@cyberplex.com> writes:
:I want to send out an email to multiple recipients.. I have my emails.. but
:I'm not sure how to send the email.. if you could reply ASAP I'd greatly
:appreciat it!!
% man -k mail
--tom
--
Though I'll admit readability suffers slightly...
--Larry Wall in <2969@jato.Jpl.Nasa.Gov>
------------------------------
Date: Mon, 3 May 1999 12:28:25 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: Stumped on Regex routine
Message-Id: <x3y676anmmu.fsf@tigre.matrox.com>
Jakob Larnforth <jakob@pris.bc.ca> writes:
> $Url = 'http://www.somedomain.com/frugal/jummy.html';
> $Url =~ s/\/.+?$//;
>
> I am trying to get the final output of $Url to eq
> http://www.somedomain.com/frugal
$Url =~ s-/[^/]+$--;
HTH,
Ala
------------------------------
Date: Mon, 3 May 1999 12:39:41 -0400
From: Ala Qumsieh <aqumsieh@matrox.com>
Subject: Re: The docs as talking books (was Re: newbie with a "howto" question)
Message-Id: <x3y3e1enm42.fsf@tigre.matrox.com>
Jonathan Stowe <gellyfish@gellyfish.com> writes:
> One area where some feedback would be useful is as to who's voice should be
> used - Mrs Gellyfish is dead set on that of Sir Anthony Hopkins but I think
> that might be national bias on her part. Suggestions ?
There is no question about it in my mind. The man with the Force. The
Darth himself.
"James Earl Jones"
------------------------------
Date: Mon, 03 May 1999 10:43:57 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: Thumbnails from JPEGs
Message-Id: <372DE05D.A16DECB5@mail.cor.epa.gov>
Martin wrote:
>
> Hi All,
>
> I'm looking for a Perl module/Script that will output a smaller
> thumbnail
> from a full sized JPEG. I've look at CPAN and in the graphics section
> at www.perl.com but can't seem to find anything.
As a matter of fact, Benjamin Franz posted in this ng about 6 weeks
ago a URL to a script of his that does just that. Hie ye to DejaNews
and search for it. IIRC, the subject line was the previously-
misspelled `Re: writing thumnails'. I seem to recall making a
rude comment to myself about the spelling at the time...
HTH,
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior Computing Specialist phone: (541) 754-4468
mathematical statistician fax: (541) 754-4716
------------------------------
Date: Mon, 03 May 1999 17:07:21 GMT
From: "Jalil Feghhi" <jalil@corp.home.net>
Subject: Using 'Require' in ASP
Message-Id: <925751241.570534@zeppelin.svr.home.net>
Lennart,
I would appreciate it if you could help me here.
I am using a function in my ASP page that is defined in another perl file I
am including in my program using 'require' but ASP interpreter complains
that it can't find the function. I think the interpreter looks for the
function w/o knowing what 'require' means.
How would one do this in ASP?
-Jalil
------------------------------
Date: Mon, 03 May 1999 10:25:59 -0700
From: David Cassell <cassell@mail.cor.epa.gov>
Subject: Re: What's the difference between Perl and CGI?
Message-Id: <372DDC27.DAC842A1@mail.cor.epa.gov>
joeyandsherry@mindspring.com wrote:
>
> I have been apparently posting to the wrong newsgroups,
>
> What's the difference between Perl and CGI?
A fair question, I think. Perl is a programming language, like
many you've heard of. It is particularly good at handling text
and gluing pieces of things together, as well as evading the
painful write-compile-link-test-curse-debug cycle of languages
like Java [to name one you've probably heard of]. As such,
many people have found it to be one of the most effective
languages for getting work done in web programming.
CGI is a protocol. It defines how any language [Perl, Python,
JavaScript, C, etc...] can interface with your web work,
just by appearing in your HTML [and hoping your web server is
set up right, another problem entirely].
> Thanks for the enlightment.
I hope this helps clear up the mystery somewhat.
David
--
David Cassell, OAO cassell@mail.cor.epa.gov
Senior Computing Specialist phone: (541) 754-4468
mathematical statistician fax: (541) 754-4716
------------------------------
Date: 03 May 1999 11:40:02 -0600
From: Daniel Grisinger <dgris@moiraine.dimensional.com>
Subject: Re: Who is Just another Perl hacker?
Message-Id: <m3lnf6aw7h.fsf@moiraine.dimensional.com>
gbacon@itsc.uah.edu (Greg Bacon) writes:
> In article <m1hfpvh2jq.fsf@halfdome.holdit.com>,
> merlyn@stonehenge.com (Randal L. Schwartz) writes:
> : So, in answer to your question, feel free to declare yourself a JAPH,
> : but most of us around here agree that I'm JAPH # 0. :)
>
> So do JAPH numbers work like Erdos number?
Nope, if they did everybody who had ever received an email
from Randal would qualify for 1.
> How does one compute one's JAPH number? :-)
Perhaps-
my $JAPHID = ($number_of_clpm_posts /
$number_of_questions_received_asking_how_your_sig_works)
*
( 0 ** 0 ); # just for greg :-)
dgris
--
Daniel Grisinger dgris@moiraine.dimensional.com
perl -Mre=eval -e'$_=shift;;@[=split//;;$,=qq;\n;;;print
m;(.{$-}(?{$-++}));,q;;while$-<=@[;;' 'Just Another Perl Hacker'
------------------------------
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 5551
**************************************
