my $string = "I'm still here";
say $string;

my @array_of_strings = qw/foo bar baz quux/;

foreach $string ( @array_of_strings ) {
		say $string;
}
say $string;

# output
I'm still here
foo
bar
baz
quux
I'm still here