perl如何使用cvs的命令

perl如何使用cvs的命令
用perl从cvs上按标签取代码,如何实现?