l i n u x - u s e r s - g r o u p - o f - d a v i s
L U G O D
 
Next Meeting:
April 21: Google Glass
Next Installfest:
TBD
Latest News:
Mar. 18: Google Glass at LUGOD's April meeting
Page last updated:
2004 Feb 10 12:00

The following is an archive of a post made to our 'vox-tech mailing list' by one of its subscribers.

Report this post as spam:

(Enter your email address)
Re: [vox-tech] Perl help requested
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [vox-tech] Perl help requested



--- Richard Crawford <rscrawford@mossroot.com>
wrote:
> 
> Peter Jay Salzman said:
> > On Tue 10 Feb 04,  9:56 AM, Richard Crawford
> <rscrawford@mossroot.com>
> > said:
> >> I'm trying to write a Perl application that
> will go through a
> >> directory and give the amount of space used
> by each directory,
> >> including each subdirectory.  So, for
> example, if myDirectory1 has
> >> three files totalling 150K and two
> subdirectories (mySubDirectoryA,
> >> with 20K of files, and mySubDirectoryB with
> 50K of files), I'd like to
> >> see output like this:
> >>
> >> DIRECTORY         SIZE
> >> ======================
> >> myDirectory1      220K
> >>
> >> I'm stuck at the first line. Any
> suggestions?
> >
> > is this a programming exercise or do you just
> want something to give you
> > the numbers?
> 
> A programming exercise.  It's something we'll
> be going back to again and
> again.  I'm having trouble installing the
> FileSys modules, which is making
> all of this unnecessarily difficult.

<snip>

File::Find comes to mind.  It is a handy way to
walk a tree, doing whatever you want, at each
file in the tree.

There are probably other better, faster ways but
if you plan on making a project of this, then
this approach might provide a little structure to
build on.

Just a thought,
Jim



__________________________________
Do you Yahoo!?
Yahoo! Finance: Get your refund fast by filing online.
http://taxes.yahoo.com/filing.html
_______________________________________________
vox-tech mailing list
vox-tech@lists.lugod.org
http://lists.lugod.org/mailman/listinfo/vox-tech



LinkedIn
LUGOD Group on LinkedIn
Sign up for LUGOD event announcements
Your email address:
facebook
LUGOD Group on Facebook
'Like' LUGOD on Facebook:

Hosting provided by:
Sunset Systems
Sunset Systems offers preconfigured Linux systems, remote system administration and custom software development.

LUGOD: Linux Users' Group of Davis
PO Box 2082, Davis, CA 95617
Contact Us

LUGOD is a 501(c)7 non-profit organization
based in Davis, California
and serving the Sacramento area.
"Linux" is a trademark of Linus Torvalds.

Sponsored in part by:
EDGE Tech Corp.
For donating some give-aways for our meetings.