Lines Matching refs:n
348 my $n = 0;
352 $n++;
353 for (; ($n % 8) != 0; $n++) {
359 $n++;
2049 for (my $n = 0; $n < $#elements; $n += 2) {
2050 $off += length($elements[$n]);
2055 if (length($opline) >= ($off + length($elements[$n + 1]))) {
2056 $cc = substr($opline, $off + length($elements[$n + 1]));
2061 $a = 'V' if ($elements[$n] ne '');
2062 $a = 'W' if ($elements[$n] =~ /\s$/);
2063 $a = 'C' if ($elements[$n] =~ /$;$/);
2064 $a = 'B' if ($elements[$n] =~ /(\[|\()$/);
2065 $a = 'O' if ($elements[$n] eq '');
2068 my $op = $elements[$n + 1];
2071 if (defined $elements[$n + 2]) {
2072 $c = 'V' if ($elements[$n + 2] ne '');
2073 $c = 'W' if ($elements[$n + 2] =~ /^\s/);
2074 $c = 'C' if ($elements[$n + 2] =~ /^$;/);
2075 $c = 'B' if ($elements[$n + 2] =~ /^(\)|\]|;)/);
2076 $c = 'O' if ($elements[$n + 2] eq '');
2077 $c = 'E' if ($elements[$n + 2] =~ /^\s*\\$/);
2202 $off += length($elements[$n + 1]);
2634 for (my $n = 0; $n < $cnt; $n++) {
2635 $herectx .= raw_line($linenr, $n) . "\n";;