#!/usr/bin/perl -l
use CGI::Session;
use CGI;

# you seem to use a CGI object for your id...don't know why
$a = CGI::Session->new(undef,new CGI,{Directory=>'/tmp'});

sub test(&) {
  eval {
    $_[0]->()
  };
  chomp $@;
  print ++$b,$",$@ ? "Died: $@":"Success";
}

test { $a->expire };  # 1 Success
test { $a->expires }; # 2 Success
test { $a->expired }; # 3 Died
test { $a->jesii };   # 4 Died
__END__
1 Success
2 Success
3 Died: Can't locate auto/CGI/Session/File/expired.al in @INC ...
4 Died: Can't locate auto/CGI/Session/File/jesii.al in @INC ...