my $root = system("su");
my $password = "password";

print "$password";
print "\n";