Error building p5-BerkeleyDB-0.29

[Jack Raats]

I get an error while updating the port.

===>  Building for p5-BerkeleyDB-0.29
cp BerkeleyDB.pm blib/lib/BerkeleyDB.pm
AutoSplitting blib/lib/BerkeleyDB.pm (blib/lib/auto/BerkeleyDB)
cp BerkeleyDB/Hash.pm blib/lib/BerkeleyDB/Hash.pm
cp BerkeleyDB.pod blib/lib/BerkeleyDB.pod
cp BerkeleyDB/Btree.pm blib/lib/BerkeleyDB/Btree.pm
/usr/local/bin/perl /usr/local/lib/perl5/5.8.8/ExtUtils/xsubpp -noprototypes -typemap /usr/local/lib/perl5/5.8.8/ExtUtils/typemap -typemap typemap  BerkeleyDB.xs > BerkeleyDB.xsc && mv BerkeleyDB.xsc BerkeleyDB.c
cc -c  -I/usr/local/include/db41  -O -pipe -O -pipe    -DVERSION=\"0.29\"  -DXS_VERSION=\"0.29\" -DPIC -fPIC "-I/usr/local/lib/perl5/5.8.8/mach/CORE"   BerkeleyDB.c
BerkeleyDB.xs: In function `XS_BerkeleyDB__Common_compact':
BerkeleyDB.xs:3565: syntax error before `end_key'
BerkeleyDB.c:5276: `end_key' undeclared (first use in this function)
BerkeleyDB.c:5276: (Each undeclared identifier is reported only once
BerkeleyDB.c:5276: for each function it appears in.)
*** Error code 1

Stop in /usr/ports/databases/p5-BerkeleyDB/work/BerkeleyDB-0.29.
*** Error code 1

Stop in /usr/ports/databases/p5-BerkeleyDB.

Thanks for your time

Jack