changes2pm(3pm)

NAME

DBI::Changes - List of significant changes to the DBI

EOH

foreach my $c (@chg) {
my @c = @$c;
my ($vsn, $date, $author, $svn) = splice @c, 0, 4;
$svn =~ s/([0-9]+)/ (svn rev $1)/;
say $ph "=head2 Changes in DBI $vsn$svn - $date";
say $ph "";
shift @c while @c && $c[ 0] !~ m/\S/;
pop @c while @c && $c[-1] !~ m/\S/;
if ($c[0] =~ s/^(\s*)(\*|\x{2022})\s*//) { my $ws = $1; s/^$ws// for @c; my @i = [ shift @c ]; while (@c) { if ($c[0] =~ s/^(\*|\x{2022})\s*//) { push @i => [ shift @c ] } else { push @{$i[-1]} => shift @c; } } say $ph "=over 2"; for (@i) { say $ph ""; say $ph "=item *"; say $ph ""; say $ph s/^\s+//r for @$_; }

        say $ph "";
        say $ph "=back";
        }
    else {
        say $ph $_ for @c;
        }
    say $ph "";
    }

print $ph <<"EOF"; =head1 ANCIENT HISTORY

12th Oct 1994: First public release of the DBI module.
(for Perl 5.000-beta-3h)

19th Sep 1994: DBperl project renamed to DBI.

29th Sep 1992: DBperl project started.