Average Time Perl
摘要:#!/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
子虚乌有
阅读(313)
推荐(0) 编辑
TestHashStruct for windows Perl
摘要:#!/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
子虚乌有
阅读(111)
推荐(0) 编辑