my @listaccountlocked = split("=", $accountlocked);
if ($listaccountlocked[1] =~ /^true$/i) {
    system("chuser account_locked='false' $username");
    print(`lsuser -a account_locked $username`); }
else {
    print("\nThe account $username is not locked\n\n"); }