@result=grep (/\ba\z/,@array);