Logo AND Algorithmique Numérique Distribuée

Public GIT Repository
Fix bug in the documentation.
[simgrid.git] / tools / doxygen / bibtex2html_postprocessor.pl
1 #!/usr/bin/perl -w
2 use utf8;
3
4 $write=0;
5 while($line = <STDIN>) {
6     chomp $line;
7     if($line =~ /table width/) {
8         $line = <STDIN>;
9         chomp $line;
10         if($line =~ /height="50"/) {
11             ## Skip preembule
12             $write=1;
13             do {
14                 $line = <STDIN>;
15                 chomp $line;
16             } while (!($line =~ /table/));
17             next;
18         }
19         if($line =~ /height="35"/) {
20             ## Change this uggly table into a h2
21             do {
22                 $line = <STDIN>;
23                 chomp $line;
24             } while (($line =~ /</));
25             $title=$line;
26             do {
27                 $line = <STDIN>;
28                 chomp $line;
29             } while (!($line =~ /table/));
30             print "<h1>$title</h1>\n";
31             next;
32         }
33     }
34     $line =~ s/<ol>/<ul>/g;
35     $line =~ s/<\/ol>/<\/ul>/g;
36
37     if($line =~ /Disclaimer:/ || $line =~ /body>/) {
38         $write=0;
39         next;
40     }
41     if($line =~ /This document was translated f/) {
42         $write=1;
43     }
44
45     if($write) {
46         print $line."\n";
47     }
48     
49 }