diff --git a/lib/BSON/OID.pm b/lib/BSON/OID.pm index 130b8fd..3a11bb2 100644 --- a/lib/BSON/OID.pm +++ b/lib/BSON/OID.pm @@ -62,7 +62,7 @@ use namespace::clean -except => 'meta'; #<<< sub _packed_oid { my $time = defined $_[0] ? $_[0] : time; - $_random = Crypt::Urandom::urandom($_RANDOM_SIZE) if $$ != $_pid; + $_random = Crypt::URandom::urandom($_RANDOM_SIZE) if $$ != $_pid; return pack( 'Na5a3', $time,