package CGI::Session::ID::static;use base 'CGI::Session::ErrorHandler';use strict;use Carp 'croak';use CGI::Session::ErrorHandler;$CGI::Session::ID::static::VERSION='4.44';sub generate_id{my($self,$args,$claimed_id)=@_;unless(defined$claimed_id){croak"'CGI::Session::ID::Static::generate_id()' requires static id";}return$claimed_id;}1;__END__
