Lines Matching refs:_

30    if (~($_ =~ /\*/)) {
31       if ($_ =~ /\\chapter{.+}/) {
34       } elsif ($_ =~ /\\section{.+}/) {
37       } elsif ($_ =~ /\\subsection{.+}/) {
42    if ($_ =~ m/MARK/) {
43       @m = split(",",$_);
60    if ($_ =~ m/MARK/) {
61    } elsif ($_ =~ m/EXAM/ || $_ =~ m/LIST/) {
62       if ($_ =~ m/EXAM/) {
69       chomp($_);
70       @m = split(",",$_);
84             $text[$line++] = $_;
85             last if ($_ =~ /math\.libtomcrypt\.com/);
92       next if ($_ =~ /\$Source/);
93       next if ($_ =~ /\$Revision/);
94       next if ($_ =~ /\$Date/);
95          $text[$line++] = $_;
97          chomp($_);
98          $_ =~ s/\t/"    "/ge;
99          $_ =~ s/{/"^{"/ge;
100          $_ =~ s/}/"^}"/ge;
101          $_ =~ s/\\/'\symbol{92}'/ge;
102          $_ =~ s/\^/"\\"/ge;
105          for ($x = 0; $x < length($_); $x++) {
106              print OUT chr(vec($_, $x, 8));
120    } elsif ($_ =~ m/@\d+,.+@/) {
123      $txt = $_;
168            $_ =~ s/@\Q$m[1]\E@/$foundline/;
180      print OUT $_;
182    } elsif ($_ =~ /~.+~/) {
184       $txt = $_;
236             $_ =~ s/~\Q$word\E~/$str/;
248       print OUT $_;
250    } elsif ($_ =~ m/FIGU/) {
252       chomp($_);
253       @m = split(",", $_);
258       print OUT $_;