$ perl -le'my @eachline = ( "one two three four\n", "five six seven eight\n" ); while(<@eachline>){print}'
one
two
three
four
five
six
seven
eight