for HOSTNAME; do
	host $HOSTNAME | perl -ne '/ has address (\S+)$/ && print "$1\n"'
done