use Digest::MD5 qw(md5_base64);
use Encode qw( encode );
use C4::Koha;
use C4::Auth;
use C4::Context;
use C4::Output;
use C4::Form::MessagingPreferences;
-