changes2pm(3) User Contributed Perl Documentation changes2pm(3)

# [NAME](#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.

2026-10-25 perl v5.44.0

---

Document: changes2pm(3pm) from perl-dbi 1.656-r1 (Chainguard OS)
Source: https://github.com/perl5-dbi/dbi