Help for this page

Select Code to Download


  1. or download this
        my $count = @{ $doc->{$sub1} };
    print "\n$sub1\t";

    for (my $i=0; $i <= $count; $i++) {
  2. or download this
        my $count = $#{ $doc->{$sub1} };
    print "\n$sub1\t";

    for my $i ( 0 .. $count ) {