hi all,

i’m stuck debugging a problem that appeared after this update made it to our systems:
http://lists.CentOS.org/pipermail/CentOS-announce/2015-January/020856.html

GDBM_File fails simple operation (which works with 1.8.0-36 of gdbm)

could someone with same perl and gdbm confirm the issue via simple script below? (would help me narrow down if this is something specific on our site or not)

> # rpm -q perl gdbm glibc
> perl-5.10.1-136.el6_6.1.x86_64
> gdbm-1.8.0-37.el6.x86_64
> glibc-2.12-1.149.el6_6.4.x86_64
> glibc-2.12-1.149.el6_6.4.i686

output of script with 1.8.0-37:

thanks

stijn

>>> SCRIPT
#!/usr/bin/perl

use GDBM_File;

my $file = “/tmp/x.db”;
my %out;
tie(%out, ‘GDBM_File’, $file, &GDBM_WRCREAT, 0644)
or print “can’t tie $file DB: $!”;

print “Adding data to tie\n”;
$out{1}=2;

print “Going to untie\n”;

untie(%out) or print “can’t untie $file DB: $!”;

<<<< SCRIPT