warn join'|', @_, $/;