BEGIN{
  ...
  use Class::Accessor;
  our ( $VERSION, $LAST_ERROR, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS );
  @ISA 		= qw( Class::Accessor );
  ...
  Variant->mk_accessor( qw(name nodes) );
}