[30035] in Perl-Users-Digest
Perl-Users Digest, Issue: 1278 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Feb 14 11:10:11 2008
Date: Thu, 14 Feb 2008 08:09:09 -0800 (PST)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 14 Feb 2008 Volume: 11 Number: 1278
Today's topics:
CGI.pm - parameter name with dollar jamesjesse68@yahoo.com
Re: CGI.pm - parameter name with dollar <yankeeinexile@gmail.com>
Re: Fast checksums? <bik.mido@tiscalinet.it>
Re: Fast checksums? <abigail@abigail.be>
how to find how many items are in a reference? <tch@nospam.syneticon.net>
Re: how to find how many items are in a reference? <jurgenex@hotmail.com>
Re: how to find how many items are in a reference? <someone@example.com>
Re: how to find how many items are in a reference? <jurgenex@hotmail.com>
Re: Problems with STDIN and POST data <waveright@gmail.com>
Re: Problems with STDIN and POST data <stoupa@practisoft.cz>
Re: Problems with STDIN and POST data <stoupa@practisoft.cz>
Re: Problems with STDIN and POST data <noreply@gunnar.cc>
question about "requiring" linux/stat.ph <szrRE@szromanMO.comVE>
Re: question about "requiring" linux/stat.ph <someone@example.com>
Question to format <bol@adv.magwien.gv.at>
Re: Question to format <someone@example.com>
www::mechanize for windows 2k using ActiveState Perl v <yogeshkagrawal@gmail.com>
Re: www::mechanize for windows 2k using ActiveState Per <yogeshkagrawal@gmail.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Thu, 14 Feb 2008 07:23:25 -0800 (PST)
From: jamesjesse68@yahoo.com
Subject: CGI.pm - parameter name with dollar
Message-Id: <6a02a9ca-c132-40bb-aae2-9e9a1ea635cc@d4g2000prg.googlegroups.com>
Hello,
I am trying to grab some params with CGI.pm. Normally not hard but the
names are like $selected.fieldname eg
$selected.ServerNumber.
These params are passed in by an application I canot change <sigh>.
And there is some existing code that does not use CGI.pm and does
rather too much print raw html.
here is the code that works:
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/&/, $buffer);
foreach $pair (@pairs)
{
($name, $value) = split(/=/, $pair);
# Un-Webify plus signs and %-encoding
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$FORM{$name} = $value;
}
..
$Server= $FORM{"\$selected.Server"})
and here is the code that does not:
use strict;
use warnings;
use CGI::Carp qw(fatalsToBrowser);
use CGI ':standard';
use CGI::Pretty;
my $ServerSerial = param( '\$selected.Server' );
and here is the URL that calls the cgi
http://192.168.12.10/cgi-bin/MyServer.cgi?%24selected.Server=FRED
Any suggestions?
TIA
J
------------------------------
Date: 14 Feb 2008 09:41:52 -0600
From: Lawrence Statton <yankeeinexile@gmail.com>
Subject: Re: CGI.pm - parameter name with dollar
Message-Id: <87zlu37dfj.fsf@hummer.cluon.com>
When you see the difference between "\$selected.Server" and
'\$selected.Server' and you will have solved your problem.
--
Lawrence Statton - lawrenabae@abaluon.abaom s/aba/c/g
Computer software consists of only two components: ones and
zeros, in roughly equal proportions. All that is required is to
place them into the correct order.
------------------------------
Date: Thu, 14 Feb 2008 09:46:44 +0100
From: Michele Dondi <bik.mido@tiscalinet.it>
Subject: Re: Fast checksums?
Message-Id: <iqv7r3d0d8qjn1bqdds3uvh56kel4coqog@4ax.com>
On Wed, 13 Feb 2008 15:39:48 -0800 (PST), "comp.llang.perl.moderated"
<ced@blv-sam-01.ca.boeing.com> wrote:
>Maybe timestamp as well as file size with a
>fallback to SHA-1 or MD5 only if time/size are
>unchanged.
That's what I do in my own dup files finding script, well except the
timestamp that's not really useful in that case.
Michele
--
{$_=pack'B8'x25,unpack'A8'x32,$a^=sub{pop^pop}->(map substr
(($a||=join'',map--$|x$_,(unpack'w',unpack'u','G^<R<Y]*YB='
.'KYU;*EVH[.FHF2W+#"\Z*5TI/ER<Z`S(G.DZZ9OX0Z')=~/./g)x2,$_,
256),7,249);s/[^\w,]/ /g;$ \=/^J/?$/:"\r";print,redo}#JAPH,
------------------------------
Date: 14 Feb 2008 10:23:27 GMT
From: Abigail <abigail@abigail.be>
Subject: Re: Fast checksums?
Message-Id: <slrnfr85kv.t9a.abigail@alexandra.abigail.be>
_
David Filmer (usenet@davidfilmer.com) wrote on VCCLXXX September MCMXCIII
in <URL:news:KeOdnZVkXf7POi7a4p2dnAA@giganews.com>:
:} George Adams wrote:
:} > Obviously backup software makers have solved this problem to
:} > make incremental backups pretty fast - what's the trick to it?
:}
:} Indeed. The rsync program, for example, is able to determine which
:} files have changed. It's really fast and really smart (it is able to
:} syncronize changed files by only transmitting the delta, not the whole
:} file). I don't know how it works, but you could possibly use rsync (in
:} dry-run mode) to make the determination of which files have changed. Or
:} you could just use rsync do do the whole backup and forget about trying
:} to code it yourself.
The OP *is* aware of the existance of rsync, as he mentioned it in his
paragraph, including the reason he cannot use it:
> Hi, all. I'm trying to make a simple backup program for myself that
> will check to see if certain files have been modifed before backing them
> up. (It's got to be portable to multiple OSes that have Perl, but
> possibly not other handy tools like, say, rsync or some such).
Abigail
--
perl -we '$@="\145\143\150\157\040\042\112\165\163\164\040\141\156\157\164".
"\150\145\162\040\120\145\162\154\040\110\141\143\153\145\162".
"\042\040\076\040\057\144\145\166\057\164\164\171";`$@`'
------------------------------
Date: Thu, 14 Feb 2008 13:23:17 +0100
From: Tomasz Chmielewski <tch@nospam.syneticon.net>
Subject: how to find how many items are in a reference?
Message-Id: <fp1brl$jh4$1@online.de>
How can I find how many items are there in a reference?
Let's say we first make:
my $data = $db->selectall_arrayref("SELECT * FROM table");
Now, I can access any data with:
print $$hardware[X][Y];
How can I find the maximum element for X, Y?
--
Tomasz Chmielewski
http://wpkg.org
------------------------------
Date: Thu, 14 Feb 2008 13:20:26 GMT
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: how to find how many items are in a reference?
Message-Id: <mmf8r3p27k6mni0kr28u9ctbpe4df6cv74@4ax.com>
Tomasz Chmielewski <tch@nospam.syneticon.net> wrote:
>How can I find how many items are there in a reference?
There is only one item in a reference, the reference itself.
>Let's say we first make:
>
>my $data = $db->selectall_arrayref("SELECT * FROM table");
>
>Now, I can access any data with:
>
>print $$hardware[X][Y];
I have no idea where this "$hardware" is coming from all of a sudden, but I
assume you are talking about a reference to an array of references to
arrays.
>How can I find the maximum element for X, Y?
To get the size of an array just use the array in scalar context. To get the
last element use the $#array notation.
To access the array from the reference please see
perldoc perlreftut
perldoc perlref, "Using references", rule#2
jue
------------------------------
Date: Thu, 14 Feb 2008 13:26:07 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: how to find how many items are in a reference?
Message-Id: <PjXsj.24181$C61.18287@edtnps89>
Tomasz Chmielewski wrote:
> How can I find how many items are there in a reference?
>
>
> Let's say we first make:
>
> my $data = $db->selectall_arrayref("SELECT * FROM table");
>
>
> Now, I can access any data with:
>
> print $$hardware[X][Y];
That is usually written as:
print $hardware->[X][Y];
> How can I find the maximum element for X, Y?
scalar( @$hardware ), scalar( @{ $hardware->[X] } )
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
------------------------------
Date: Thu, 14 Feb 2008 13:32:26 GMT
From: Jürgen Exner <jurgenex@hotmail.com>
Subject: Re: how to find how many items are in a reference?
Message-Id: <9ig8r3td0br6qakp9d93p8jmf7o6ei0osn@4ax.com>
"John W. Krahn" <someone@example.com> wrote:
>Tomasz Chmielewski wrote:
>print $hardware->[X][Y];
>
>> How can I find the maximum element for X, Y?
>
>scalar( @$hardware ), scalar( @{ $hardware->[X] } )
Off-by-one error. He was asking for the maximum element (I suppose he
actually meant maximum index), not the size of the array.
jue
------------------------------
Date: Thu, 14 Feb 2008 01:33:43 -0800 (PST)
From: Todd Wade <waveright@gmail.com>
Subject: Re: Problems with STDIN and POST data
Message-Id: <d1828b5c-8d1d-4a8b-bcbb-b094cfddfbbc@m78g2000hsh.googlegroups.com>
On Feb 13, 2:36 pm, xhos...@gmail.com wrote:
> SergioQ <ser...@warptv.com> wrote:
>
> > Am having some very serious problems reading the POST data that is
> > being sent to my Perl script. The full code (minus my email address
> > is below). And essentially what I am getting back via email reports
> > is that that there is data being sent via POST, and tht it has a
> > length of 1431. Yet all my attempts to read it are failing
> > miserably.
> >
> > use CGI qw(:standard);
> > ...
> > read STDIN, $serg_bffr, $ENV{'CONTENT_LENGTH'};
> > ...
>
> Since you are using it, why not use CGI to read from STDIN for you?
IIRC It does automatically when use()d in this manner. Thats why
$serg_bffr is empty.
Todd W.
------------------------------
Date: Thu, 14 Feb 2008 12:54:21 +0100
From: "Petr Vileta" <stoupa@practisoft.cz>
Subject: Re: Problems with STDIN and POST data
Message-Id: <fp1asf$2tnj$2@ns.felk.cvut.cz>
SergioQ wrote:
> On Feb 13, 2:36 pm, xhos...@gmail.com wrote:
>
>
> THIS IS FROM PAYPAL
> #!/usr/bin/perl
>
> # read post from PayPal system and add 'cmd'
> read (STDIN, $query, $ENV{'CONTENT_LENGTH'});
> $query .= '&cmd=_notify-validate';
>
Hmm, this is very stupid example on Paypel web, I know it :-)
Reading from STDIN on some hostings not work or not work properly. I rewrote
this to
#!/usr/bin/perl
use CGI qw(Vars param);
use LWP::UserAgent;
my @query='';
foreach (keys %{Vars()})
{
push @query, $_ . '=' . param($_);
}
push $query, 'cmd=_notify-validate';
# post back to PayPal system to validate
$ua = new LWP::UserAgent;
$req = new HTTP::Request 'POST','http://www.paypal.com/cgi-bin/webscr';
$req->content_type('application/x-www-form-urlencoded');
$req->content(join('&', @query));
$res = $ua->request($req);
--
Petr Vileta, Czech republic
(My server rejects all messages from Yahoo and Hotmail. Send me your
mail from another non-spammer site please.)
Please reply to <petr AT practisoft DOT cz>
------------------------------
Date: Thu, 14 Feb 2008 13:49:43 +0100
From: "Petr Vileta" <stoupa@practisoft.cz>
Subject: Re: Problems with STDIN and POST data
Message-Id: <fp1ddk$2v74$1@ns.felk.cvut.cz>
Petr Vileta wrote:
> SergioQ wrote:
>> On Feb 13, 2:36 pm, xhos...@gmail.com wrote:
>>
>>
>> THIS IS FROM PAYPAL
>> #!/usr/bin/perl
>>
>> # read post from PayPal system and add 'cmd'
>> read (STDIN, $query, $ENV{'CONTENT_LENGTH'});
>> $query .= '&cmd=_notify-validate';
>>
> Hmm, this is very stupid example on Paypel web, I know it :-)
> Reading from STDIN on some hostings not work or not work properly. I
> rewrote this to
>
> #!/usr/bin/perl
> use CGI qw(Vars param);
> use LWP::UserAgent;
>
> my @query='';
> foreach (keys %{Vars()})
> {
> push @query, $_ . '=' . param($_);
> }
> push $query, 'cmd=_notify-validate';
^^^^^^^^^^^^^^^
SORRY, should be
push @query, 'cmd=_notify-validate';
> # post back to PayPal system to validate
> $ua = new LWP::UserAgent;
> $req = new HTTP::Request
> 'POST','http://www.paypal.com/cgi-bin/webscr';
> $req->content_type('application/x-www-form-urlencoded');
> $req->content(join('&', @query)); $res = $ua->request($req);
--
Petr
Skype: callto://fidokomik
Na mail uvedeny v headeru zpravy nema cenu nic posilat, konci to v PR*
:-)
Odpovidejte na petr na practisoft cz
Petr Vileta, Czech republic
(My server rejects all messages from Yahoo and Hotmail. Send me your
mail from another non-spammer site please.)
Please reply to <petr AT practisoft DOT cz>
------------------------------
Date: Thu, 14 Feb 2008 16:44:47 +0100
From: Gunnar Hjalmarsson <noreply@gunnar.cc>
Subject: Re: Problems with STDIN and POST data
Message-Id: <61j5ufF1uid3jU1@mid.individual.net>
Todd Wade wrote:
> On Feb 13, 2:36 pm, xhos...@gmail.com wrote:
>> SergioQ <ser...@warptv.com> wrote:
>>>
>>> use CGI qw(:standard);
>>> ...
>>> read STDIN, $serg_bffr, $ENV{'CONTENT_LENGTH'};
>>
>> Since you are using it, why not use CGI to read from STDIN for you?
>
> IIRC It does automatically when use()d in this manner. Thats why
> $serg_bffr is empty.
I think your memory gives way. ;-) IIRC, STDIN is emtied only when you
create a CGI object or call one of the CGI.pm functions.
--
Gunnar Hjalmarsson
Email: http://www.gunnar.cc/cgi-bin/contact.pl
------------------------------
Date: Thu, 14 Feb 2008 01:57:41 -0800
From: "szr" <szrRE@szromanMO.comVE>
Subject: question about "requiring" linux/stat.ph
Message-Id: <fp13an0tv9@news2.newsguy.com>
Hello. I am wrapping up a rather large server migration job I was tasked
with. Everything is running wonderfully.
One thing I noticed in a few legacy Perl scripts that had <code>require
"linux/stat.ph";</code> near the top and making use of functions like
S_ISLNK, resulting in this sort of error, which can be easily
reproduced:
$ perl -e 'require "linux/stat.ph"; &S_ISLNK'
Undefined subroutine &main::S_ISLNK called at -e line 1.
It seems the problem is coming from line 7 in
/usr/local/perl5.8.8/lib/site_perl/5.8.8/i686-linux-64int-ld/linux/stat.ph
if(defined( &__KERNEL__) || !defined( &__GLIBC__) ||
((defined(&__GLIBC__) ? &__GLIBC__ : 0) < 2)) {
Here is what the values for those defines are:
$ perl -e 'require
"/usr/local/perl5.8.8/lib/site_perl/5.8.8/i686-linux-64int-ld/linux/stat.ph";
print "[", &__KERNEL__, "]"'
Undefined subroutine &main::__KERNEL__ called at -e line 1.
$ perl -e 'require
"/usr/local/perl5.8.8/lib/site_perl/5.8.8/i686-linux-64int-ld/linux/stat.ph";
print "[", &__GLIBC__, "]"'
[2]
&__KERNEL__ is not defined and &__GLIBC__ is 2
If I comment out line 7 (and it's closing brace) then all the &S_ subs
(ie, S_ISLNK) are found properly, but I don't want to use such a hack, I
would like to fix the problem itself.
Thanks for any help.
-------------------------------
Perl Info Below
-------------------------------
$ perl -v
This is perl, v5.8.8 built for i686-linux-64int-ld
[...]
$ perl -V
Summary of my perl5 (revision 5 version 8 subversion 8) configuration:
Platform:
osname=linux, osvers=2.4.20-8, archname=i686-linux-64int-ld
uname='linux srlinux 2.4.20-8 #1 thu mar 13 17:54:28 est 2003 i686
i686 i386 gnulinux '
config_args='-Dprefix=/usr/local/perl5.8.8 -Duse64bitint'
hint=recommended, useposix=true, d_sigaction=define
usethreads=undef use5005threads=undef useithreads=undef
usemultiplicity=undef
useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
use64bitint=define use64bitall=undef uselongdouble=define
usemymalloc=n, bincompat5005=undef
Compiler:
cc='cc', ccflags
='-fno-strict-aliasing -pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64
-I/usr/include/gdbm',
optimize='-O2',
cppflags='-fno-strict-aliasing -pipe -I/usr/local/include -I/usr/include/gdbm'
ccversion='', gccversion='3.2.2 20030222 (Red Hat Linux 3.2.2-5)',
gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
ivtype='long long', ivsize=8, nvtype='long double', nvsize=12,
Off_t='off_t', lseeksize=8
alignbytes=4, prototype=define
Linker and Libraries:
ld='cc', ldflags =' -L/usr/local/lib'
libpth=/usr/local/lib /lib /usr/lib
libs=-lnsl -lgdbm -ldb -ldl -lm -lcrypt -lutil -lc
perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
libc=/lib/libc-2.3.2.so, so=so, useshrplib=false, libperl=libperl.a
gnulibc_version='2.3.2'
Dynamic Linking:
dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib'
Characteristics of this binary (from libperl):
Compile-time options: PERL_MALLOC_WRAP USE_64_BIT_INT USE_LARGE_FILES
USE_LONG_DOUBLE USE_PERLIO
Built under linux
Compiled at Feb 11 2008 01:12:44
%ENV:
PERL5LIB="/home/SR/perllib:"
@INC:
/home/SR/perllib
/usr/local/perl5.8.8/lib/5.8.8/i686-linux-64int-ld
/usr/local/perl5.8.8/lib/5.8.8
/usr/local/perl5.8.8/lib/site_perl/5.8.8/i686-linux-64int-ld
/usr/local/perl5.8.8/lib/site_perl/5.8.8
/usr/local/perl5.8.8/lib/site_perl
.
--
szr
------------------------------
Date: Thu, 14 Feb 2008 13:21:43 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: question about "requiring" linux/stat.ph
Message-Id: <HfXsj.24180$C61.8695@edtnps89>
szr wrote:
> Hello. I am wrapping up a rather large server migration job I was tasked
> with. Everything is running wonderfully.
>
> One thing I noticed in a few legacy Perl scripts that had <code>require
> "linux/stat.ph";</code> near the top and making use of functions like
> S_ISLNK, resulting in this sort of error, which can be easily
> reproduced:
>
> $ perl -e 'require "linux/stat.ph"; &S_ISLNK'
> Undefined subroutine &main::S_ISLNK called at -e line 1.
Change:
require "linux/stat.ph";
To:
use Fcntl;
perldoc -f stat
[ SNIP ]
You can import symbolic mode constants ("S_IF*") and functions
("S_IS*") from the Fcntl module:
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
------------------------------
Date: Thu, 14 Feb 2008 15:02:58 +0100
From: "Ferry Bolhar" <bol@adv.magwien.gv.at>
Subject: Question to format
Message-Id: <1202997783.483300@proxy.dienste.wien.at>
Hi,
I use "format" and "write" to create formatted output
very often (yes, I'm an old FORTRAN programmer! ;-).
Now I want to output a 2-digit number with a leading
zero if the value is < 9. So, according to perlform,
I wrote
format =
@0#
$data
.
$data = 3;
write;
hoping to get "03". However, this yields "003".
Omitting the "#" yields "30", omitting the "0"
yields " 3".
What is the required format picture to get values
in the range "00" - "99"?`
Greetings, Ferry
--
Ing Ferry Bolhar
Magistrat der Stadt Wien - MA 14
A-1010 Wien
E-Mail: ferdinand.bolhar-nordenkampf@wien.gv.at
------------------------------
Date: Thu, 14 Feb 2008 14:32:59 GMT
From: "John W. Krahn" <someone@example.com>
Subject: Re: Question to format
Message-Id: <viYsj.24202$C61.9672@edtnps89>
Ferry Bolhar wrote:
>
> I use "format" and "write" to create formatted output
> very often (yes, I'm an old FORTRAN programmer! ;-).
> Now I want to output a 2-digit number with a leading
> zero if the value is < 9. So, according to perlform,
> I wrote
>
> format =
> @0#
> $data
> .
>
> $data = 3;
> write;
>
> hoping to get "03". However, this yields "003".
> Omitting the "#" yields "30", omitting the "0"
> yields " 3".
>
> What is the required format picture to get values
> in the range "00" - "99"?`
format =
@>
sprintf( '%02d', $data )
.
John
--
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order. -- Larry Wall
------------------------------
Date: Thu, 14 Feb 2008 02:14:32 -0800 (PST)
From: Yogi <yogeshkagrawal@gmail.com>
Subject: www::mechanize for windows 2k using ActiveState Perl v 5.8.0
Message-Id: <f04259e3-7d07-412b-a778-cb7f44d0b40e@m78g2000hsh.googlegroups.com>
Hi,
I have been struggling to use www::mechanize for one of my script.
The version of activestate perl i have (v5.8.0) does not provide
www::mechanize as standard distribution. I read in some of the links
that I will have to download "WWW-Mechanize-1.34.tar.gz" from CPAN and
then install it in my machine. While doing the process, there are
certain steps like:
> perl Makefile.pl
> make
....
....
My understanding is that "make" is the utility available in Linux/Unix
OS but not in windows. Some document suggest to use "nmake" instead of
"make" for windows. will anyone suggest me the steps to install
required module from CPAN to my activestate version?
Very thanks in advance.
------------------------------
Date: Thu, 14 Feb 2008 04:51:51 -0800 (PST)
From: Yogi <yogeshkagrawal@gmail.com>
Subject: Re: www::mechanize for windows 2k using ActiveState Perl v 5.8.0
Message-Id: <cd60784f-5aa3-4d87-a412-97c06dcb2766@e30g2000hsa.googlegroups.com>
On Feb 14, 3:14 pm, Yogi <yogeshkagra...@gmail.com> wrote:
> Hi,
> I have been struggling to use www::mechanize for one of my script.
> The version of activestate perl i have (v5.8.0) does not provide
> www::mechanize as standard distribution. I read in some of the links
> that I will have to download "WWW-Mechanize-1.34.tar.gz" from CPAN and
> then install it in my machine. While doing the process, there are
> certain steps like:> perl Makefile.pl
> > make
>
> ....
> ....
> My understanding is that "make" is the utility available in Linux/Unix
> OS but not in windows. Some document suggest to use "nmake" instead of
> "make" for windows. will anyone suggest me the steps to install
> required module from CPAN to my activestate version?
>
> Very thanks in advance.
Hi Guys,
I got the answer to my question. Got nmake utility from "http://
download.microsoft.com/download/vc15/Patch/1.52/W95/EN-US/Nmake15.exe"
and also figured out how to use CPAN modules.
http://www.perlmonks.org/?node_id=434813
Many thanks,
-Y
------------------------------
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.
NOTE: due to the current flood of worm email banging on ruby, the smtp
server on ruby has been shut off until further notice.
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 V11 Issue 1278
***************************************
