Hi monks,
I'm trying to convert some of my code from forks to forks::BerkeleyDB but Im having some weird problems,

     
use forks::BerkeleyDB;
use forks::BerkeleyDB::shared;

     
my @oky: shared;
my $doky = ['sims','sim2'];
@oky = ($doky,'2');
[download]

A simple code like this one don't work, so I'm assuming that forks::BerkeleyDB can't take refs.
Please correct me If I'm wrong :)
###############################

Invalid value for shared scalar: ARRAY at /usr/local/lib/perl/5.8.8/fo
+rks/shared.pm line 631
    threads::shared::_croak('Invalid value for shared scalar: ARRAY') 
+called at /usr/local/share/perl/5.8.8/forks/BerkeleyDB/shared.pm line
+ 92
    forks::BerkeleyDB::shared::_filter_store_value() called at /usr/lo
+cal/share/perl/5.8.8/forks/BerkeleyDB/shared/array.pm line 53
    forks::BerkeleyDB::shared::array::STORE('forks::BerkeleyDB::shared
+::array=ARRAY(0xd44c90)', 0, 'ARRAY(0xd0a790)') called at /usr/local/
+share/perl/5.8.8/forks/BerkeleyDB/shared.pm line 381
    threads::shared::AUTOLOAD('threads::shared=HASH(0xd44a60)', 0, 'AR
+RAY(0xd0a790)') called at test.cgi line 6
[download]

Thanks U all.