use DB_File;
warn $DB_File::VERSION;
warn $DB_File::db_version;
die $DB_File::db_ver;
__END__
1.805 at - line 2.
4.1 at - line 3.
4.001025 at - line 4.