get the file size using readdir 1

[MoshiachNow]

Trying to get the file size using readdir with e following code (taken from some perl manual),but without any luck:

opendir DH,"$tempdir" or die "Could not open $tempdir !\n";
while ($_ = readdir (DH)) {
next unless (/$targetfile/);
$currentSize = print -s _;
}

will appreciate advise.
(I know that line "$currentSize = print -s _" is wrong ...)

Long live king Moshiach !

http://www.noahide.com

 

[spookie]

while ($_ = readdir (DH)) {
    next unless (/$targetfile/);
    $currentSize = -s $_;
    print $currentSize ;
}

--------------------------------------------------------------------------
I never set a goal because u never know whats going to happen tommorow.

 

[ishnid]

That's assuming you're reading from the pwd.

 

[MoshiachNow]

Thanks to both.
Works fine now.

Long live king Moshiach !

http://www.noahide.com