use DB_File; print qq{ ### $] #~ \$DB_File::db_ver $DB_File::db_ver #~ \$DB_File::db_version $DB_File::db_version #~ \$DB_File::VERSION $DB_File::VERSION ######## }; __END__ ### 5.014001 #~ $DB_File::db_ver 5.001025 #~ $DB_File::db_version 5.1 #~ $DB_File::VERSION 1.824 ########