#!/usr/bin/perl use strict; for my $host (@ARGV) { my $addr = gethostbyname($host); my $sum = 0; $sum = $sum * 256 + ord for split //, $addr; print "$host: $sum\n"; }
In reply to RE: Convert hostname to decimal form
by japhy
in thread Convert hostname to decimal form
by ar0n
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |