~ubuntu-branches/ubuntu/wily/libpgjava/wily

« back to all changes in this revision

Viewing changes to src/interfaces/jdbc/utils/changelog.pl

  • Committer: Bazaar Package Importer
  • Author(s): Stefan Gybas
  • Date: 2002-02-06 23:43:06 UTC
  • Revision ID: james.westby@ubuntu.com-20020206234306-hsg7suqr8q56qg40
Tags: upstream-7.2
ImportĀ upstreamĀ versionĀ 7.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
#!/bin/perl
 
2
 
 
3
while(<>) {
 
4
    chomp();
 
5
    s/\t+/ /g;
 
6
    if(substr($_,0,3) eq ' - ') {
 
7
        print "<ul>" if !$inlist;
 
8
        $inlist=1;
 
9
        print "<li>".substr($_,3)."\n";
 
10
    } else {
 
11
        if($_ eq "" || $_ eq " ") {
 
12
            print "</ul>" if $inlist;
 
13
            $inlist=0;
 
14
            print "<br>\n";
 
15
        } elsif(substr($_,0,1) eq " ") {
 
16
            print $_;
 
17
        } else {
 
18
            print "</ul>" if $inlist;
 
19
            $inlist=0;
 
20
            print "<h4>".$_."</h4>\n";
 
21
        }
 
22
    }
 
23
}