use Socket;
$ipaddr = inet_aton(127.0.0.1);

# In Perl 5.6 you can convert with the v-string notation:
# $ipaddr = v127.0.0.1;