Help for this page

Select Code to Download


  1. or download this
    print join ".", unpack 'C*', scalar gethostbyname('mediamind.be');
  2. or download this
    use strict;
my $ip = join ".", unpack 'C*', scalar gethostbyname('mediamind.be');
...
use Data::Dumper;
$Data::Dumper::Useqq = 1;
print Dumper @result;