Help for this page

Select Code to Download

Select or download this
scalar(@dev_list) == $#dev_list + 1; scalar(@xref) == $#xref + 1;

Select or download this

for my $devitem (@dev_list) {
    print "Looking for $devitem\n";
...
            my @{$templine}[0]=$xrefitem;
    }
}