Opennebula aii ONE 4.8 network AR support

This is being used as a predicate, so state it already in the method's name. A more idiomatic handle is

```perl
sub is_supported_one_version {
    my ($self, $one) = @_;
    ...
    return version->parse($oneversion) > version->parse(ONEVERSION);
}
```

(plus your logging and whatnot).

Then it gets used as

```perl
return 0 if !$self->is_supported_one_version($one);
# or
$self->is_supported_one_version($one) or return 0;
```