Perl基本技一：马克输出——OUTPUT原格式输出（print STDOUT

sub ShowUsage { print STDOUT << "EOF"; moniter my computer disk usage: $0 file [-d] [-h] -d: excute -h: this (help) message EOF } EOF 是一个标记的名字，自定义标记名称 h

>>阅读原文<<