VantagePro.pm initialiser 

sub _Initialise {
  my $self = shift;
  # Nothing to do here yet
}

• Should be:

sub _Initialise {
  my $self = shift;
  $self->SUPER::_Initialise( @_ );
  # Still nothing to do here
}