my $cgi = CGI::Simple->new;
my $pass = $cgi->param("pass");
say $pass;