$users->insert_one( { "name" => "Joe", "age" => 52, "likes" => [qw/skiing math ponies/] }); #### $db->get_collection( 'users' )->insert_one( { a => 1, b => 1 } ); #### $rp = MongoDB::WriteConcern->new(); # w:1, wtimeout: 1000 $rp = MongoDB::WriteConcern->new( w => 'majority', wtimeout => 10000, # milliseconds ); #### use Try::Tiny; use Safe::Isa; # provides $_isa try { $coll->insert_one( $doc ) } catch { if ( $_->$_isa("MongoDB::DuplicateKeyError" ) { ... } else { ... } }; #### Returns a MongoDB::WriteConcern object constructed from "w", "write_concern" and "j". #### $coll->insert({ name => "John Doe", age => 42 });