Select Code to Download

use strict;
use CGI qw(:standard);
...

my $cgi = new CGI();      
my $session = new CGI::Session(undef, undef, {Directory=>'\tmp'});

Can't locate DB_File.pm in @INC (@INC contains: C:/Perl/lib C:/Perl/si
+te/lib .)
at C:/Perl/site/lib/CGI/Session/DB_File.pm line 12.
BEGIN failed--compilation aborted at C:/Perl/site/lib/CGI/Session/DB_F
+ile.pm lin
e 12.

my $session = new CGI::Session("driver:FILE", undef, Directory=>File::
+Spec->tmpdir);