use warnings;
use strict;

my @arr1 = qw (this will print for sure);
my @arr2 = qw (this is second array);
foreach my $things (@arr1) {
	print "$things\n";
};

foreach my $things (@arr2) {
	print "$things\n";
};