my @comments = grep { (split /\//, $_)[-1] =~ /^$username/ } <$config{cards}/comments/*.txt>;