import List
findAnagram = filter . isAnagram
isAnagram orig =(==)(sort orig).sort
main = do w <- getLine
          c <- getContents
          putStr$unlines$findAnagram w$lines c