摘要:
一般性的语法:#!/usr/bin/perluse strict;use warnings;main(@ARGV);sub main{ message("This is the template.pl exercise file from Perl 5 Essential Training.");}sub message{ my $m = shift or return; print("$m\n");}sub error{ my $e = shift || 'unkown error'; print("$0: $e\n" 阅读全文
posted @ 2011-12-05 00:06
韩英武
阅读(266)
评论(0)
推荐(0)
浙公网安备 33010602011771号