ip="172.16.38.104"
for i in `cat /proc/net/arp | grep wan | awk '{print $1}' | xargs`;
do
nc -zv $i 22001 2>/dev/null && ip=${i}
done
echo $ip | tr -d "\n"