[Perl] perl code for memory modify
#!/usr/bin/perl
if ($ARGV >= 0) {
open(SRC,"$ARGV[0]") or die("ERROR:Please assign a source data file!!!!!!!!");
}else{
print("ERROR:Please assign a source data file!!!!!!!!");
exit();
}
open...
原创
2018-06-01 18:54:21 ·
229 阅读 ·
0 评论