my $username = 'Fred';
my $password = 'Flintstone123';
my $cgi      =  CGI::Simple->new( { username => $username, pass => $password } );

user_crypt($cgi);