2012年12月25日
摘要: #!/usr/perl/bin/perl open(FHD, "C:\\wflogs\\WorkflowServerLog.txt") || die("can't open the file\n"); open(OFH, ">c:\\wflogs\\AverageTimeLog.txt") || d 阅读全文
posted @ 2012-12-25 14:11 子虚乌有 阅读(314) 评论(0) 推荐(0)
摘要: #!/usr/perl/bin/perl#open(FHD, "c:\\test\\test.txt") || die("cna't open the file\n"); my %hash; $hash{1} = {name=> 'mm1', age=> 18, sex=>'female'}; $h 阅读全文
posted @ 2012-12-25 14:06 子虚乌有 阅读(114) 评论(0) 推荐(0)