prompt$ perl -e '$HOSTNAME = `hostname -s`; print $HOSTNAME;' | od -c