How to popup confirm with password (other password not same like ssh password), then execute with ssh?

use CGI qw/:standard/;
use DBI;
use strict;
use Time::Local;
use Net::SSH2;
#use Term::ReadKey; < maybe?
Main Code

my $pw;
my $pws = "1234";

if ($lqcgi->param('sel_cl')){
$selected_action = $lqcgi->param('sel_cl');
print "Password: \n"; #How to popup confirm with password. I don't know!
$pw = ;
chomp ($pw);
if ($pw eq $pws){
$ssh2->connect($host{$mxEnv}) or die $!;

Check Solution