PT-90 Ran util/update command to add changes to bin

~/perldev/percona-toolkit $ ./util/update-modules bin/pt-stalk collect

bin/pt-stalk

@@ -832,9 +832,7 @@ collect() {
       $CMD_MYSQLADMIN $EXT_ARGV debug
    else
       log "Could not find the MySQL error log"
-   fi
-
-
+   fi 
    if [ "${mysql_version}" '>' "5.1" ]; then
       local mutex="SHOW ENGINE INNODB MUTEX"
    else
@@ -959,6 +957,10 @@ collect() {
          ps_locks_transactions "$d/$p-ps-locks-transactions"
       fi
 
+      if [ "${mysql_version}" '>' "5.6" ]; then
+         (echo $ts; ps_prepared_statements) >> "$d/$p-prepared-statements" &
+      fi
+
       curr_time=$(date +'%s')
    done
    log "Loop end: $(date +'TS %s.%N %F %T')"
@@ -1123,6 +1125,14 @@ ps_locks_transactions() {
 
 }
 
+ps_prepared_statements() {
+   $CMD_MYSQL $EXT_ARGV -e "SELECT t.processlist_id, pse.* \
+                            FROM performance_schema.prepared_statements_instances pse \
+                            JOIN performance_schema.threads t \
+                            ON (pse.OWNER_THREAD_ID=t.thread_id)\G"
+}
+
+
 # ###########################################################################
 # End collect package
 # ###########################################################################