@listの末尾に@numがある時だけ@ansにぶち込みたいんです
二度目以降に見つけてもシカトするという条件があります。

@num = (19,20,55,63);
@list = (ketu63,etu63,a55hoi,hoi55,asdf63,a2a0,huga19,cool20);
for(@list){ @ans=grep(/$_$/,@num); }

↑のように書いてみたんですが
@ans = (huga19,cool20,hoi55,ketu63)
となって欲しいのに

@ans = (19,20,55,63)
となってしまうのです。

文字列の末尾をチェックして文字列全体を返したいのですがどのようにしたらいいでしょうか
よろしくです