1: mvs.390 ldd
2case $# in
31)	header=0 ;;
4*)	header=1 ;;
5esac
6for file
7do	case $header in
8	1)	echo "$file:"
9		header=2
10		;;
11	2)	echo
12		echo "$file:"
13		;;
14	esac
15	strings $file |
16	sed -e '/\<[[:lower:]][[:alnum:]]*\.dll\>/!d' -e 's/^/	/' |
17	sort -u
18done
19