An absence of parens is changing your context, so you're seeing the number of matches, rather than the match(es) themselves.

($index) = grep $piclist[$_] eq $pic, 0 .. $#piclist;

    --k.