use warnings;
use strict;

my @f1 = qw(x y z);
my @f2 = qw(a b);
for (@f1, @f2) {
    print "$_\n";
}

__END__

x
y
z
a
b