Package MyModule;

use Apache::Session::File;

sub tie_session {

        my $hash = {}; 

        eval {
                tie %$hash, 'Apache::Session::File',undef,
                {Directory     => $r->dir_config('Blah'),
                 LockDirectory => $r->dir_config('Blah'),
                };
        };
        return $@ if ($@);
        return $hash;
}

1;