Re: [PERL] Problem med inet_ntoa

[Ole Tange <sslug@sslug>]

On Sat, 10 Feb 2001, David Darville wrote:

> Jeg har et underligt problem med inet_ntoa, som jeg efter lang
> tids debugging har kogt ned til følgende eksempel:
> 
> 
> #! /usr/bin/perl
> 
> use Socket;
> 
> $a=inet_aton('127.000.000.007');
> $b=inet_ntoa($a);
> 
> $a=inet_aton('127.000.000.8');
> $b=inet_ntoa($a);
> 
> $a=inet_aton('127.000.000.008');
> $b=inet_ntoa($a);
> 
> 
> Jeg kan ikke selv se nogen betydningsfuld forskel mellem disse 3
> eksempler, men alligevel fejler det i sidste linie. Der er ikke
> noget problem at lave et udtryk der fjerner overskydende 0'er,
> men jeg ville alligevel gerne vide hvad fejlen skyldes.

Mon ikke problemet er octal? 07 er valid og == 0x7 == 7. Men 08 går galt.

/Ole
-- 
Jeg må dog give Hans Schou ret
                            -- Ole Espersen