my $session = MLDBMSession->new(FILE => "c:\\perl_user\sessions.db", SESSION_ID => $session_id, TIMEOUT => 100);
$session->add_key( value1 => 20 );