Help for this page
for( $i = 0; $i <= $#link; $i++ ) { ...
for my $i ( 0 .. $#link ) { ...
for my $i ( 0 .. $#{ $link_ref } ) { my $links = $link_ref->[ $i ]->[ 0 ]; }