use Time::HiRes qw/time/;
use Data::Dump qw(dump);
-#use CouchDB;
-
use MongoDB;
-my $conn = MongoDB::Connection->new;
-our $db = $conn->get_database( 'pxelator' );
-our $audit = $db->get_collection( 'audit' );
+our $audit;
+
+eval {
+ my $conn = MongoDB::Connection->new;
+ my $db = $conn->get_database( 'pxelator' );
+ $audit = $db->get_collection( 'audit' );
+};
+warn "ERROR: no store for audit: $@" if $@;
sub audit {
# CouchDB::_store_audit( "$time.$package.$url" => $data );
# $data->{_id} = "$time.$package.$url";
- $audit->insert( $data );
+#
+ if ( $audit ) {
+ $audit->insert( $data );
+ } else {
+ warn "AUDIT ",dump($data);
+ }
}