in reply to Reading parts of array elements

for(@foo){
    print "got x $_\n" if /^x/;
}

[download]
perlintro, perlretut, index, substr

In Section Seekers of Perl Wisdom