README.md

implement cat in perl