sub function {
my ($hash) = @_;

 tie %$hash, 'Apache::Session::File', undef,
            {
              Directory => $r->dir_config('blah'),
              LockDirectory => $r->dir_config('blah'),
            };
$hash->{auth}->{user} = "jacques"

}