qq_41022608的博客

文件夹的名字是try_vim，其中包括很多.pl脚本文件和一些其他的乱七八糟的东西，我想把这个文件夹里面的perl脚本文件筛选出来，然后再把脚本里含有定义my语句的行整理出来。 #!/usr/bin/perl use warnings; use strict; my $dir = "../try_vim"; my $file; my @filename; undef $/; opendir (DI...

文件cell.txt中有很多cell名字，很多重复的，把它们统计一下，输出有多少种cell，每一种重复了几次 #!/usr/bin/perl use warnings; open IN, "<cell.txt"; while (<IN>){ $cnt++; $line = $_; $line =~ s/...