print map( {baz $_} @quux), ' results.', $/;