counting opened files

[rafiu]

i'm using a file handle to open multiple files but I'm not getting the actual results - not knowing how many files that are opened. do you guys know any little code I can use?
Below is what I'm using but its giving me a bogus answer.

use strict;
my $count = 0 ;
while ( $count >= 0 )
{
$count++ ;
$FH = "FILE" . "$count" ;
open $$FH , "$file_path" or last ;
}

print "\n $count File opens\n" ;

 

[KevinADC]

hmmm.... the code you posted will not even compile. Is that the real code you are using?

------------------------------------------
- Kevin, perl coder unexceptional!

 

[rafiu]

use strict;
foreach $file_path (@file_path)
{
print "$file_path\n" #this has the full path to each file
my $count = 0 ;
while ( $count >= 0 )
{
$count++ ;
$FH = "FILE" . "$count" ;
open $$FH , "$file_path" or last ;
}

print "\n $count File opens\n" ;
}

 

[KevinADC]

Thats not going to compile either if thats all the code. Are we to assume the code is valid and compiles and runs?
If so, what does it print at the end?

------------------------------------------
- Kevin, perl coder unexceptional!

 

[prex1]

I concur with Kevin: please post a working code without errors (there is one for example in the fourth line), even if it doesn't what you need, and better specify the goal of the code: why are you opening many (how many?) files at the same time?

Franco

http://www.xcalcs.com

: Online tools for structural design

http://www.megamag.it

: Magnetic brakes for fun rides

http://www.levitans.com

: Air bearing pads