[32705] in Perl-Users-Digest
Perl-Users Digest, Issue: 3969 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Wed Jun 19 09:09:20 2013
Date: Wed, 19 Jun 2013 06:09:05 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Wed, 19 Jun 2013 Volume: 11 Number: 3969
Today's topics:
A remark about 'field hashes' <rweikusat@mssgmbh.com>
Re: A remark about 'field hashes' <rweikusat@mssgmbh.com>
Automating the Amazon "manage your kindle" page <texboydmoore@gmail.com>
Re: constructors vs. subclasses? <ben@morrow.me.uk>
Re: constructors vs. subclasses? <rweikusat@mssgmbh.com>
Re: CPAN vs. POD outside of .pm (.pl) files? <ben@morrow.me.uk>
Re: Having trouble parsing JSON structure with JSON pac <ben@morrow.me.uk>
Re: Having trouble parsing JSON structure with JSON pac <davidmichaelkarr@gmail.com>
help with regex <nospam.gravitalsun.noadsplease@hotmail.noads.com>
Re: How to minimize server load when program is run <ben@morrow.me.uk>
Re: Problem with splice in a 2D ARRAY gamo@telecable.es
Re: Problem with splice in a 2D ARRAY <rweikusat@mssgmbh.com>
Re: Problem with splice in a 2D ARRAY <derykus@gmail.com>
Re: Problem with splice in a 2D ARRAY <ben@morrow.me.uk>
Re: Problem with splice in a 2D ARRAY <derykus@gmail.com>
Re: Status of Perl for OS/2? <paul@smedley.id.au>
Re: Status of Perl for OS/2? <komh@chollian.net>
using CPAN to install pm to Strawberry Perl carl.hurley@email.edcc.edu
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Tue, 18 Jun 2013 17:59:47 +0100
From: Rainer Weikusat <rweikusat@mssgmbh.com>
Subject: A remark about 'field hashes'
Message-Id: <87y5a7jqws.fsf@sapphire.mobileactivedefense.com>
I've had a closer look at this out of curiosity (beyond my initial
assessment as 'useless module'): This is actually based on the idea to
define a hash per 'object property' and use the 'object id' as index
into the hash in order to obtain the value. Besides forcing users to
use hashes for storing object properties (something some people
presumably consider to be 'a feature') this means
- every access to a property needs to turn the object into an
object id and go through a 'gatekeeper abstraction' (which
people who misunderstood the Java Beans specification as
being concerned with objects accessing their own properties
instead of objects accessing properties of other object
presumably also consider a feature since it eliminates the
advantages of the other approach)
- the amount of work which needs to be performed when an
object is destroyed is proportional to the number of
properties
- the amount of work which needs to be performed when creating
a new ithread (IMHO not a good idea) is proportional to the
number of objects times the number of fields
- with a naive implementation, the same (uselessly) happens
'during global destruction'
IMO, a better idea is to use a package global hash to associate an
object (via refaddr) with a hash or array reference and use that in
the conventional way. This way, destroying a single object needs only
a single deletion, the amount of work necessary to clone or terminate
an interpreter is proportional to the number of objects and a method
can use a single lookup/ function call to gain access to the 'state
object' of the current instance and use that directly afterwards.
------------------------------
Date: Wed, 19 Jun 2013 09:53:37 +0100
From: Rainer Weikusat <rweikusat@mssgmbh.com>
Subject: Re: A remark about 'field hashes'
Message-Id: <87vc5azdke.fsf@sapphire.mobileactivedefense.com>
Rainer Weikusat <rweikusat@mssgmbh.com> writes:
[...]
> - the amount of work which needs to be performed when creating
> a new ithread (IMHO not a good idea) is proportional to the
> number of objects times the number of fields
This should have been 'times the average number of fields per object'.
------------------------------
Date: Tue, 18 Jun 2013 15:35:25 -0700 (PDT)
From: boyd <texboydmoore@gmail.com>
Subject: Automating the Amazon "manage your kindle" page
Message-Id: <4f177c29-783b-441e-bfa5-d62b0f72ec5b@googlegroups.com>
I am rusty in using Perl - not much programming since I retired in 2007.=20
But when I find something that is tedious in computer use, I wish I were st=
ill on top of using perl. Is it even feasible to try to program a script/mo=
dule to automate the "manage your kindle" page? I use the library e-book s=
ervice a lot, but it is a real pain to "return" and "delete from library" a=
series of books, since there is no "mark" and "take action" type service.
If it is feasible, in which direction should start?
Thanks.
Boyd
------------------------------
Date: Mon, 17 Jun 2013 23:12:04 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: constructors vs. subclasses?
Message-Id: <k6e49a-cm52.ln1@anubis.morrow.me.uk>
Quoth Rainer Weikusat <rweikusat@mssgmbh.com>:
> Ben Morrow <ben@morrow.me.uk> writes:
> >
> > Don't use a plain hash for this job, use a fieldhash (created with
> > Hash::Util::Fieldhash). It will track object destruction automatically,
> > and will handle changing all the keys when a new thread is created in a
> > threaded perl.
>
> Please consider making that "I would prefer to use ... because of
> ...".
Please consider minding your own manners before criticising other
people's.
> To me, Hash::Util::Fieldhash is one of the (many) examples of
> someone who felt somewhat bored and implemented some useless general
> purpose library for some random something which didn't run away
> quickly enough.
Anno is not stupid (is there anyone else left who remembers when he was
a regular here?). HUF is not an academic exercise in solving a problem
because it's there to solve (which is an accusation that could
reasonably be levelled at something like Moose, no matter how useful I
believe the result may have turned out to be). It's a specific solution
to the problems inherent in implementing inside-out objects, namely:
- every class needs a destructor to clear entries in the hash, and
subclasses which override the destructor need to be careful to
ensure the base method is called;
- as with any class with a meaningful destructor, care needs to be
taken over what exactly happens during global destruction, which
is much easier to get right from C than from Perl;
- every attribute access needs to use refaddr, which adds verbosity
to what is already a rather verbose construction;
- every class needs a CLONE method to handle thread creation, which
is not particularly straighforward to get right.
> And I generally don't care about the products of this
> kind of 'recreational programming': Code should solve real problems
> and not programming problems
You really don't understand about abstraction, do you? 'Programs which
write programs are the happiest programs of all.' (Alan Perlis)
> and 'abstractions' intended to do the
> latter should only be introduced after very careful consideration and
> if they provide significant benefits. In case of 'abstractions
> provided by third party code',
HUF is not third-party code, it's a core perl feature which happens to
be exposed through a core module. In this respect it's no different from
restricted hashes (via Hash::Util), Perl's Unicode support (via Encode
and PerlIO), or any number of other features which have been added since
Perl gained module support.
Ben
------------------------------
Date: Tue, 18 Jun 2013 11:42:40 +0100
From: Rainer Weikusat <rweikusat@mssgmbh.com>
Subject: Re: constructors vs. subclasses?
Message-Id: <87vc5bwvhb.fsf@sapphire.mobileactivedefense.com>
Ben Morrow <ben@morrow.me.uk> writes:
> Quoth Rainer Weikusat <rweikusat@mssgmbh.com>:
>> Ben Morrow <ben@morrow.me.uk> writes:
>> >
>> > Don't use a plain hash for this job, use a fieldhash (created with
>> > Hash::Util::Fieldhash). It will track object destruction automatically,
>> > and will handle changing all the keys when a new thread is created in a
>> > threaded perl.
>>
>> Please consider making that "I would prefer to use ... because of
>> ...".
>
> Please consider minding your own manners before criticising other
> people's.
I figure that I could get at least a text page worth of derogatory
remarks you made about me (as opposed to statements criticising some
or all of my opinions) out of your postings without much
difficulty, the one above included. This may be your idea of "minding
one's manners" (presumably, everything is fine when targetting people
who "surely deserve it") but it is certainly not mine.
------------------------------
Date: Mon, 17 Jun 2013 21:03:37 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: CPAN vs. POD outside of .pm (.pl) files?
Message-Id: <pl649a-mb42.ln1@anubis.morrow.me.uk>
Quoth Ivan Shmakov <oneingray@gmail.com>:
> >>>>> Ben Morrow <ben@morrow.me.uk> writes:
> >>>>> Quoth Ivan Shmakov <oneingray@gmail.com>:
>
> >> I see that CPAN automagically extracts the POD documentation out of
> >> the .pm and .pl files and presents it as HTML.
>
> > What do you mean by 'CPAN'? The CPAN shell doesn't normally do this.
> > Do you mean search.cpan.org?
>
> Yes, I've meant http://search.cpan.org/ specifically, even
> though I've inaccurately referenced the whole cpan.org
> infrastructure.
>
> I didn't mean cpan(1).
OK. I asked because I think it's possible to configure at least cpanp to
install HTML documentation, and IIRC ActiveState have or used to patch
their CPAN.pm to do the same.
> >> However, now I decide to split the documentation off the .pm's. How
> >> do I request CPAN to extract my documentation out of stand-alone POD
> >> files instead? (and associate it with the respective .pm's?)
>
> > search.cpan.org already displays a list of all the .pod files in a
> > distribution under the 'Documentation' section. If a .pm file has no
> > Pod, and there is a .pod file next to it, it moves the .pod link up
> > into the 'Modules' section.
>
> (Which makes me wonder where is it documented?)
I don't think it is. search.cpan.org is not part of the CPAN
infrastructure per se, it was just a useful website written by Graham
Barr which was given a domain under cpan.org. I believe the intention is
that it should index things in the same way as CPAN.pm and perldoc.
> > See for example Net::SSLeay.
>
> > It's probably important to get the NAME section of the Pod right. I
> > don't exactly know how the search.cpan.org/perldoc?foo links it uses
> > for L<> work, but I suspect they're indexed based on the NAME
> > section.
>
> ACK, thanks! Hopefully, such indexing won't insist on the use
> of a HYPHEN-MINUS (U+002D) there, instead of the arguably more
> appropriate EN DASH (U+2013).
I wouldn't muck about with the formatting of the NAME section. pod2man
in particular is quite picky about it, and there are other tools which
rely on the format being right.
Ben
------------------------------
Date: Mon, 17 Jun 2013 21:12:39 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: Having trouble parsing JSON structure with JSON package
Message-Id: <n6749a-mb42.ln1@anubis.morrow.me.uk>
Quoth David Karr <davidmichaelkarr@gmail.com>:
>
> sub countJSONServices($) {
> my ($jsonText) = @_;
> my $json = JSON->new->allow_nonref;
This line does nothing useful. Why is it there?
> my $scalar = from_json($jsonText);
> printhash($scalar);
> my $serviceCallResults = $scalar->{"sl.serviceCallResults"};
> #print "serviceCallResults[" . $serviceCallResults . "]\n";
> printhash($serviceCallResults);
> my $services = $serviceCallResults->{"sl.services"};
> printhash($services);
> my $servicesList = $services->{"sl.service"};
> print "servicesList[$servicesList]\n";
> for my $service (@servicesList) {
You're not using 'strict'. Bad programmer, no cookie!
$servicesList and @servicesList are completely different variables. You
want to deref the arrayref in $servicesList, that is, @$servicesList.
(You might want to consider using less verbose variable names. That much
repetition makes the code extremely hard to read.)
> print "service[$service]\n";
> }
> my $servicesCount = scalar @servicesList;
> print "servicesCount[$servicesCount]\n";
> return $servicesCount;
> }
>
> Where "printhash()" simply is this:
>
> sub printhash($) {
> my ($hash) = @_;
> while ( my ($key, $value) = each(%{$hash}) ) {
> print "$key => $value\n";
> }
> }
You might want to consider using Data::Dumper or Data::Dump instead.
Ben
------------------------------
Date: Mon, 17 Jun 2013 13:56:19 -0700 (PDT)
From: David Karr <davidmichaelkarr@gmail.com>
Subject: Re: Having trouble parsing JSON structure with JSON package
Message-Id: <489a6175-f8e0-45aa-8924-8577632c0281@googlegroups.com>
On Monday, June 17, 2013 1:12:39 PM UTC-7, Ben Morrow wrote:
> Quoth David Karr <davidmichaelkarr@gmail.com>:
>
> >
>
> > sub countJSONServices($) {
>
> > my ($jsonText) = @_;
>
> > my $json = JSON->new->allow_nonref;
>
>
>
> This line does nothing useful. Why is it there?
Obsolete artifact. Removed now.
> > my $scalar = from_json($jsonText);
>
> > printhash($scalar);
>
> > my $serviceCallResults = $scalar->{"sl.serviceCallResults"};
>
> > #print "serviceCallResults[" . $serviceCallResults . "]\n";
>
> > printhash($serviceCallResults);
>
> > my $services = $serviceCallResults->{"sl.services"};
>
> > printhash($services);
>
> > my $servicesList = $services->{"sl.service"};
>
> > print "servicesList[$servicesList]\n";
>
> > for my $service (@servicesList) {
>
>
>
> You're not using 'strict'. Bad programmer, no cookie!
>
>
>
> $servicesList and @servicesList are completely different variables. You
>
> want to deref the arrayref in $servicesList, that is, @$servicesList.
>
>
>
> (You might want to consider using less verbose variable names. That much
>
> repetition makes the code extremely hard to read.)
>
>
>
> > print "service[$service]\n";
>
> > }
>
> > my $servicesCount = scalar @servicesList;
>
> > print "servicesCount[$servicesCount]\n";
>
> > return $servicesCount;
>
> > }
>
> >
>
> > Where "printhash()" simply is this:
>
> >
>
> > sub printhash($) {
>
> > my ($hash) = @_;
>
> > while ( my ($key, $value) = each(%{$hash}) ) {
>
> > print "$key => $value\n";
>
> > }
>
> > }
>
>
>
> You might want to consider using Data::Dumper or Data::Dump instead.
>
>
>
> Ben
Got it. Cleaned up now, and it's working. Thanks.
------------------------------
Date: Wed, 19 Jun 2013 15:00:18 +0300
From: George Mpouras <nospam.gravitalsun.noadsplease@hotmail.noads.com>
Subject: help with regex
Message-Id: <kps6f4$15u3$1@news.ntua.gr>
I must discover all possible field names of a key/value file.
The properties of the file are unknown so I must be a little creative.
The values optional can have whitespaces inside "..."
its key/value separated with a space from the next pair.
Do you thing the following is ok ?
#!/usr/bin/perl
use strict;
use warnings;
while(<DATA>) { chomp;
while ( /([^=]+)=("[^"]+"|\S+)/g ) {
my ($key, $val) = ($1, $2);
$val =~s/^["\s]*(.*?)["\s]*$/$1/;
print "*$key* *$val*\n"
}
print "--------\n"
}
__DATA__
f1=hello f2= f3="foo" f4="hello world"
f6="day" f7="day & night" f8=100
------------------------------
Date: Mon, 17 Jun 2013 21:06:51 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: How to minimize server load when program is run
Message-Id: <rr649a-mb42.ln1@anubis.morrow.me.uk>
Quoth Willem <willem@turtle.stack.nl>:
> Justin C wrote:
> ) My web-hosts are running perl 5.8.8, other software there is of a
> ) similar age, and some things are missing (I wanted to 'nice' my
> ) program, but there is no 'nice').
> )
> ) I have written a backup program to tar and gzip my entire directory
> ) tree on their site, and also to dump the db and add that to the tar.
> ) The program I have written runs one of my cores at 100% for two
> ) minutes, and uses almost 100MB RAM. If there is a way I'd like to
> ) reduce this load (as I can't 'nice' it).
>
> Odd, I would have expected a tar/gzip action to be I/O bound.
> That is, use 100% disk read/write capacity and not as much CPU.
The OP is using Archive::Tar, which builds the tar entirely in memory
(uncompressed, I think). I have recommended he switch to tar(1)...
Ben
------------------------------
Date: Mon, 17 Jun 2013 20:36:22 +0000 (UTC)
From: gamo@telecable.es
Subject: Re: Problem with splice in a 2D ARRAY
Message-Id: <kpns06$gao$1@speranza.aioe.org>
So you're actually trying to exchange two columns. Yes, that is the way
to do it. For the more general case of reversing the columns of a NxM
matrix, you want
for my $r (@matrix) {
splice @$r, 0, $#r, reverse @$r;
}
You should look on CPAN: a lot of this sort of basic stuff has already
been implemented.
Ben
---------------------------
very useful, thanks
I see things like Array::Utils, but it's about operations onm two matrix.
Math::MatrixReal is excelent but it's for computations purpose. I don't
know how to search more.
Thanks again
------------------------------
Date: Mon, 17 Jun 2013 21:57:26 +0100
From: Rainer Weikusat <rweikusat@mssgmbh.com>
Subject: Re: Problem with splice in a 2D ARRAY
Message-Id: <871u80a215.fsf@sapphire.mobileactivedefense.com>
Ben Morrow <ben@morrow.me.uk> writes:
> Quoth Rainer Weikusat <rweikusat@mssgmbh.com>:
>> Ben Morrow <ben@morrow.me.uk> writes:
>> > Quoth gamo <gamo@telecable.es>:
>> >>
>> >> Hello, I have a 2D array and want to interchange rows and columns.
>> >
>> > Well, did you try the obvious way?
>> >
>> > my @old = ...;
>> > my @new;
>> >
>> > for my $r (0..$#old) {
>> > my $row = $old[$r];
>> > for my $c (0..$#$row) {
>> > $new[$c][$r] = $$row[$c];
>> > }
>> > }
>> >
>> > I'm not sure it's possible to do that any more elegantly, given that you
>> > can't take a slice vertically through a 2d array.
>>
>> sub transpose
>> {
>> my $in = $_[0];
>> my (@out, $col);
>>
>> for $col (0 .. $#{$in->[0]}) {
>> push(@out, [map { $_->[$col] } @$in[0 .. $#$in]])
>> }
>
> Yes, that's the same algorithm, just with map instead of for,
This means it is an equivalent algorithm and specifically,
> though it probably is worth pointing out that
>
> map $_->[$col], @2d;
>
> is the way to take a vertical slice.
I wrote it because it came to me that it was actually possible to get
'a vertical slice' out of 'a 2d array' with an expression instead of a
1-by-1 copying loop. It is also possible to get rid of the outer loop
(working with 'arrays' / 'lists' this time for a change):
sub transpose
{
my $col;
return map {
$col = $_;
[map { $_->[$col] } @_]
} 0 .. $#{$_[0]};
}
------------------------------
Date: Mon, 17 Jun 2013 15:05:02 -0700
From: Charles DeRykus <derykus@gmail.com>
Subject: Re: Problem with splice in a 2D ARRAY
Message-Id: <kpo16k$uoo$1@speranza.aioe.org>
On 6/17/2013 1:36 PM, gamo@telecable.es wrote:
> for my $r (@matrix) {
> splice @$r, 0, $#r, reverse @$r;
> }
use List::MoreUtils qw/each_arrayref/;
my @old = (...);
my @new;
my $iter = each_arrayref( @old );
while (my @row = $iter->()) { push @new, [reverse @row] };
--
Charles DeRykus
------------------------------
Date: Mon, 17 Jun 2013 23:29:27 +0100
From: Ben Morrow <ben@morrow.me.uk>
Subject: Re: Problem with splice in a 2D ARRAY
Message-Id: <77f49a-cm52.ln1@anubis.morrow.me.uk>
Quoth gamo@telecable.es:
Did you read the bit before where I asked you to quote properly? That
means: insert a '>' at the start of each line you are quoting, and
include a header saying whose message you are quoting from.
> [I wrote:]
>> So you're actually trying to exchange two columns. Yes, that is the way
>> to do it. For the more general case of reversing the columns of a NxM
>> matrix, you want
>>
>> for my $r (@matrix) {
>> splice @$r, 0, $#r, reverse @$r;
>> }
>>
>> You should look on CPAN: a lot of this sort of basic stuff has already
>> been implemented.
>
> very useful, thanks
>
> I see things like Array::Utils, but it's about operations onm two matrix.
> Math::MatrixReal is excelent but it's for computations purpose. I don't
> know how to search more.
Well, a quick look finds Math::Matrix and Array::DeepUtils, as well as
things like PDL which are probably a more suitable representation if
you're using matrices for calculations.
Ben
------------------------------
Date: Mon, 17 Jun 2013 22:13:43 -0700
From: Charles DeRykus <derykus@gmail.com>
Subject: Re: Problem with splice in a 2D ARRAY
Message-Id: <kpoqad$jni$1@speranza.aioe.org>
On 6/17/2013 3:05 PM, Charles DeRykus wrote:
> On 6/17/2013 1:36 PM, gamo@telecable.es wrote:
>> for my $r (@matrix) {
>> splice @$r, 0, $#r, reverse @$r;
>> }
>
>
> use List::MoreUtils qw/each_arrayref/;
>
> my @old = (...);
> my @new;
>
> my $iter = each_arrayref( @old );
> while (my @row = $iter->()) { push @new, [reverse @row] };
>
Sorry, I see the mis-attribution now... still not sure what was wanted.
But my above suggestion both transposes and swaps.
If just transposing with no swap:
my $iter = each_arrayref( @old );
while (my @row = $iter->()) { push @new, \@row };
--
Charles DeRykus
------------------------------
Date: Tue, 18 Jun 2013 10:10:22 +0930
From: Paul Smedley <paul@smedley.id.au>
Subject: Re: Status of Perl for OS/2?
Message-Id: <kpoa0a$gvm$1@dont-email.me>
Hi Shmuel,
On 18/06/13 02:14, Shmuel (Seymour J.) Metz wrote:
> The perldelta for 5.18 suggests that if nobody is actively working on
> Perl for OS/2 then the Perl developers may drop the OS/2 related code.
> I'm currently using Perl 5.10; Perl 5.14 had path rewriter issues and
> I'm not aware of a more recent build for OS/2. Is anybody in the OS/2
> community working on Perl 5.16 or 5.18, and, if so, have they made
> themselves known to the Perl developers?
http://smedley.id.au/tmp/perl-5.16.3-os2-20130519.zip
------------------------------
Date: Tue, 18 Jun 2013 20:37:13 +0900
From: KO Myung-Hun <komh@chollian.net>
To: Paul Smedley <paul@smedley.id.au>
Subject: Re: Status of Perl for OS/2?
Message-Id: <51C04669.6090200@chollian.net>
Hi/2.
Paul Smedley wrote:
> Hi Shmuel,
>
> On 18/06/13 02:14, Shmuel (Seymour J.) Metz wrote:
>> The perldelta for 5.18 suggests that if nobody is actively working on
>> Perl for OS/2 then the Perl developers may drop the OS/2 related code.
>> I'm currently using Perl 5.10; Perl 5.14 had path rewriter issues and
>> I'm not aware of a more recent build for OS/2. Is anybody in the OS/2
>> community working on Perl 5.16 or 5.18, and, if so, have they made
>> themselves known to the Perl developers?
>
> http://smedley.id.au/tmp/perl-5.16.3-os2-20130519.zip
>
This version has corrupted os2ish.h and os2thread.h. They seems to be
just a symbolic link.
--
KO Myung-Hun
Using Mozilla SeaMonkey 2.7.2
Under OS/2 Warp 4 for Korean with FixPak #15
In VirtualBox v4.1.24 on Intel Core i7-3615QM 2.30GHz with 8GB RAM
Korean OS/2 User Community : http://www.ecomstation.co.kr
------------------------------
Date: Tue, 18 Jun 2013 11:16:48 -0700 (PDT)
From: carl.hurley@email.edcc.edu
Subject: using CPAN to install pm to Strawberry Perl
Message-Id: <48d9ae2f-cccb-435e-839f-2c147f13f77b@googlegroups.com>
I'm not getting Win32::DirSize installed on Strawberry Perl ( DWIM Perl )
This is perl 5, version 14, subversion 2 (v5.14.2) built for MSWin32-x86-mu=
lti-thread
I'm using 'cpan' to do the install.
The OS is Microsoft Windows Server 2003 up to date
Server is a file server, part of a Windows domain, not a domain controller.
This is a clean install of DWIM Perl though I have installed and uninstalle=
d the language file several times attempting to get this install happy.
The reason I'm trying to install this pm is that I have a script, originall=
y developed for Perl 5.8.822, which uses the components of this pm to my gr=
eat advantage to query and return data related to file storage for users we=
want to archive files for so we can remove the user accounts from our doma=
in.
From the 'cpan' prompt I'm issuing the command 'install Win32::DirSize
The output of the run from this command indicates that the name is being ch=
anged to 'Win32DirSize'.
I have read the output from the perllocal.pod. According to it the file wa=
s installed into C:\Dwimperl\perl\site\lib>, however when checking there I =
find there is no folder with this name, no pm installed in the lib folder a=
nd no folder installed in the Win32 folder. Checking in the folder 'auto' =
in the lib directory I do find a folder for Win32DirSize with a single file=
named .packlist of zero file size.
I checked in the C:\Dwimperl\cpan\build directory and do find a folder for =
Win32-DirSize-1.13-JNinsi and an associated .yml file. The folder contains=
a Win32 folder, which contains a DirSize folder which contains several fil=
es including the DirSize.pm file.
The file Win32-DirSize-1.13-JNinsi.yml contains several lines of output sim=
ilar to this:
"install: !!perl/hash:CPAN::Distrostatus"
The first word in the line is different as in 'make', 'maketest', 'test'.=
=20
It appears that the normal process to install the program module failed for=
some reason.
If possible I would really like to use this program module. I have attempt=
ed several different ways to manually move the pm file to the same folder i=
t existed in, in the install I had of Perl 5.8.822 but all attempts have fa=
iled. My Perl script will not compile failing to load and use a constant f=
rom the .pm.
If this module will not work with Strawberry Perl I just need to know so I =
can stop bashing my head into this wall and try a new one. If it will work=
, then some help with the 'cpan' documentation to learn how to correctly in=
stall the program module would be welcome.
I noticed that one of the lines in the file, on closer reading, indicated t=
hat to install it depended on MakeMaker so I have recently installed that. =
I reran install Win32::DirSize. The output from the install command in cp=
an indicated that the install had already occurred and there was nothing to=
do.
Hope someone will help.
Thanks.
------------------------------
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:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#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 3969
***************************************
