my @bar = qw(a c e g i k m o q s u w y);
@bar = @bar[2,4,6];
push @bar, 't';