(* Enter your code here. Read input from STDIN. Print output to STDOUT *)

let compList hk str1 =
  let rec cn hk str1 hn sn =
    if (hn < (String.length hk)) then (
        if (sn < (String.length str1)) then (
          if (hk.[hn] = str1.[sn]) then (cn hk str1 (hn+1) (sn+1))
            else (cn hk str1 hn (sn+1))
        ) else ( print_endline "NO")
    )
      else ( print_endline "YES" )
  in cn hk str1 0 0

let main =
  let a = read_int () in
    for i=1 to a do
      compList "hackerrank" (read_line ())
    done