opendir(my $LOGDIR, "./+logs/~$uid") or die "$!";
my @logs = grep { !/^\./xms } readdir($LOGDIR);
closedir($LOGDIR);