Skip to content

Instantly share code, notes, and snippets.

@darrenpmeyer
Created June 10, 2022 18:10
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save darrenpmeyer/8d1c1ccf59a94adc10ca524434c15342 to your computer and use it in GitHub Desktop.
Save darrenpmeyer/8d1c1ccf59a94adc10ca524434c15342 to your computer and use it in GitHub Desktop.
Perl one-liner to get IP address from mDNS/DNS/Bonjour/whatever - works on any *nix that supports getHostByName
# usage: `ip4 HOSTNAME`
alias ip4='perl -MSocket -e '\''$pack=gethostbyname($ARGV[0]); print inet_ntoa($pack)'\'''
# returns an IP address for HOSTNAME
perl -MSocket -e '$pack=gethostbyname($ARGV[0]); print inet_ntoa($pack)' HOSTNAME
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment