Convert Site Name to Dotted IP Address

[Anant Gupta]

I wrote

#!usr/bin/perl
use Socket;
use constant ADDR => 'www.google.com';
my $name=shift || ADDR;
$packed=gethostbyname($name);
$dotted-inet_ntoa($packed);
print "DOtted Address is $packed";

but it is showing an error
"Bad argument length for Socket length in inet_ntoa" ???
Help