Help for this page
for($m = 0; $m < scalar(@pathway_name); $m++) # foreach pathway name +given by an integer { ... } # end + while ($j < $row) undef %seen; # since + going on to the next pathway, undefine %seen }