use Socket;
$a = inet_aton("1.2.3.4");