add & for call function myprint.
perl script for list tags(TODO,BUG) in a source code project.