foreach $_ (@data){
  print $_{"LISP"}."\n";
}