view release on metacpan or  search on metacpan

Aut/UI/Console.pm  view on Meta::CPAN

whatever is standard for the given UI environment).

=back

=head2 Password related

=head3 C<ask_pass(aut:Aut, msg:string [,any]) --E<gt> string>

=over 1

This function displays message 'msg', displays a appropriate prompt and
asks the user to input his/hers password.

Returns the password that has been entered, or C<undef>, if an empty
password has been given.

=back

=head3 C<login(aut:Aut [,any]) --E<gt> Aut::Ticket>

=over 1

test.pl  view on Meta::CPAN

################################################################
# Post message
################################################################

print <<EOF
You can repeat this test, after adding some accounts with different
authorization levels. Try e.g.:

- Installing with an account without 'admin' rights.
- Logging in with an invalid account (login will prompt you max. 3 times).
- Enter false data while changing the password.
- Change passwords from the admin menu.
- Change rights from the admin menu.
- Delete all accounts.
- Change rights of all accounts until and including the last admin account.

etc.

EOF