"John W. Krahn" schreef:

> $ perl -le'
> use Socket;
> my $ipAddress = "23.34.45.56";
> print unpack "xxxC", inet_aton $ipAddress;
> '
> 56



$ perl -wle'
  my $ip = v23.34.45.56;
  print ord substr $ip, -1;
'
56


$ perl -wle'
  my $ip = "23.34.45.56";
  print ord substr eval "v$ip", -1;
'
56

:)

-- 
Affijn, Ruud

"Gewoon is een tijger."

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to