Help for this page
$user = $1 if $query->param('user') && $query->param('user') =~ /(\w{3 +,12})/;
$user = $1 if defined( $query->param('user') ) && $query->param('user' +) =~ /(\w{3,12})/;