SYNOPSIS
my
$user
= Catalyst::Authentication::Store::UserXML::User->new({
xml_filename
=>
$file
});
say
$user
->username;
die
unless
$user
->check_password(
'secret'
);
EXAMPLE
<!-- userxml-folder/some-username -->
<user>
<username>some-username</username>
<password>{CLEARTEXT}secret</password>
</user>