in reply to array reading problem
You're assigning the result of the open to the array, rather than reading the file:
open(DPATH,"..."); my @r = <DPATH>; ...
rdfield
|
---|
In Section
Seekers of Perl Wisdom