print/.*test$/g,$/ for@names; say/.*test$/g for@names;