List all processes still using deleted libssl, in Zsh. (To fight against heartbleed and future vulnerability...)

pslist-still-using-deleted-libssl.zsh

#!/bin/zsh
typeset -A dup; dup=()
grep libssl /proc/*/maps|grep deleted|while read fn rest; do
  pid=${${fn#/proc/}//\/*/}
  ((dup[$pid]++)) && continue
  echo -n $pid " "; readlink /proc/$pid/exe
done