find file descriptors of cached Flash videos

lsfd.sh

#!/bin/bash

proc=$(ps ax | awk '/flashplayer/{ if($5 != "awk") { print $1; }}')

[ -z "$proc" ] && exit 0


for p in $proc; do
	flash=$(ls -al /proc/$p/fd | grep FlashX)
	if [ -n "$flash" ]; then
		ls -al /proc/$p/fd | awk '/FlashX/{ print "/proc/' $p '/fd/" $9 }'
	fi
done