use strict; use warnings; my ($light,$salvation,$strength)= my @lord; my @those_I_fear = (); my @those_I_am_afraid_of = (); #a bit redundant :^/