Help for this page
print "Password: "; chomp(my $passwd = <STDIN>); ... '-m', $username, );
system( '/usr/bin/sudo', ... '-m', $username, );