feedback and ok sthen@
Perl Regexp::Copy allows you to copy the contents of one Regexp object to another.