Help for this page

Select Code to Download


  1. or download this
    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"); }