Help for this page

Select Code to Download

Select or download this

            # Count POD
            if ($line =~ /^=/) {
                pod++;

Select or download this

            # Count POD
            if ($line =~ /^=[a-z]/) {
                $pod++;