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