从Perl的列表中选择元素