foreach $e (@s) { print "$e\n"; } #### 0 an_item 1 another_item etc.