Maybe cp from Perl Power Tools project will help you. From its manpage it has -p option but seems to lack the -r.

<cite>Just a tongue-tied, twisted, earth-bound misfit. -- Pink Floyd</cite>