Select Code to Download

=head1 Data First OOP

...

for my $shift ( qw( DAY NIGHT GRAVEYARD ) ) {
}

package Base::Hosts;
use strict;
...

    1;
}