摘要： 1 #!/usr/bin/perl 2 if ($ARGV >= 0) { 3 open(SRC,"$ARGV[0]") or die("ERROR:Please assign a source data file!!!!!!!!"); 4 }else{ 5 print("ERROR:Please assign a source data file!!!!!!!!"); 6 ... 阅读全文