John Maliniak wrote:
> With the following snippet below how do I add a file sizes to the
> output.
> Any suggestions will be much appreciated.
>
> Original Message-
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On Behalf Of $Bill
> Luebkert
> Sent: Monday, April 18, 2005 5:26 AM
From: John Maliniak [mailto:[EMAIL PROTECTED]
>
> From: [EMAIL PROTECTED]
> >
> > use strict;
> > use File::Find;
> >
> > my $dir = shift || "C:/";
> > print "$dir: \n";
> > find (\&wanted, $dir);
> >
> > sub wanted {
> >
> > return if /^\.{1,2}$/;
> > print "$File::Find::name: \n" if -d;
> >
With the following snippet below how do I add a file sizes to the
output.
Any suggestions will be much appreciated.
Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of $Bill
Luebkert
Sent: Monday, April 18, 2005 5:26 AM
To: Robert Maxwell
Cc: ActivePerl@listse
First off ALWAYS "use strict;" it's just a waste not to.
At your assignment: "$number = ;" I assume you put in a value here by hand,
(hard coded). You should have shown an example of this. If you just type
"$number = 01010001" then perl will take it as a hexadecimal number and thus
the 16. Basic
[EMAIL PROTECTED] wrote on 05/01/2005 10:50:38 AM:
> May anyone tell me if this program is wrong or if there is a
> implementation problem in perl 5.8.6, 5.8.5, 5.8.2
> I will show the perl version and a c++ version. The c++ version
> worked. I will also show the version of the perl version that
>
[EMAIL PROTECTED] wrote on 05/01/2005 10:50:38 AM:
> May anyone tell me if this program is wrong or if there is a
> implementation problem in perl 5.8.6, 5.8.5, 5.8.2
> I will show the perl version and a c++ version. The c++ version
> worked. I will also show the version of the perl version that
>
