摘要:
string.pl#!/usr/bin/perl#usestrict;usewarnings;main(@ARGV);submain{my$string="thisisastring\n";print$string;chomp$string;message("[$string]");chop$string;message("[$string]");my$s2=uc$string;message($s2);$s2=lc$string;message($s2);$s2=substr($string,5,2);message($s2);$s 阅读全文
posted @ 2012-03-11 23:54
韩英武
阅读(298)
评论(0)
推荐(0)
浙公网安备 33010602011771号