Help for this page

Select Code to Download

Select or download this

for (@yourarray) {
    my @ary = (split/ /, $_, 5)[0 .. 4];
}