Sponsoring The Perl Toolchain Summit 2025: Help make this important event another success Learn more

requires 'data';
requires '_populate';
has 'ArrivalGate' => ( is => 'rw' );
before '_populate' => sub {
my $self = shift;
my $data = $self->data;
my $item = delete $data->{ArrivalGate};
$self->ArrivalGate( $item );
};
1;