my $a32 = eval "v$a->{ip}";
my $b32 = eval "v$b->{ip}";
$a32 <=> $b32 ||
...