perl跑脚本自用简单模板