$barren = [ ('fishing') x 2,
            'hunting/gathering',
            'raiding',
            ('whaling/sealing') x 2,
            ('non-sufficient')  x 2
           ];
[download]

PerlMonks lovingly hand-crafted by Tim Vroom.
PerlMonks somehow became entangled with The Perl Foundation.
Marvelous Managed Hosting and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.