Cross ref for scripts

When ever needed kind of cross references for scripts which uses which.

#!/bin/bash

FILS=$(ls -1 | egrep "(\.sh|\.pl)$"| while read JMN; do
if [ -f "$JMN" ]; then
echo "$JMN"
fi
done)

for FI in $FILS; do
echo "$FI"
for FJ in $FILS; do
if [ "x$(grep $FJ $FI)" != "x" ]; then
echo " * $FJ"
fi
done
done