Help for this page
Select Code to Download
Select
or
download this
for ($i=0; $i<$Num_of_Files; $i++) { open(Read, $file[$i]); @Read = <Read>; ...}