/dev-perl/Regexp-Copy/