- 博客(4)
- 收藏
- 关注
原创 perl练习(统计文件中cell的数量)
文件cell.txt中有很多cell名字,很多重复的,把它们统计一下,输出有多少种cell,每一种重复了几次 #!/usr/bin/perl use warnings; open IN, "<cell.txt"; while (<IN>){ $cnt++; $line = $_; $line =~ s/...
2019-10-08 15:34:50 468
原创 perl学习第三篇:把某个文件夹下面的所有文件中含有“my”字符的行写入输出文件(my.rpt)中(菜鸟的继续练习)
文件夹的名字是try_vim,其中包括很多.pl脚本文件和一些其他的乱七八糟的东西,我想把这个文件夹里面的perl脚本文件筛选出来,然后再把脚本里含有定义my语句的行整理出来。 #!/usr/bin/perl use warnings; use strict; my $dir = "../try_vim"; my $file; my @filename; undef $/; opendir (DI...
2019-08-01 15:57:03 317
原创 perl学习第二篇:将数据转为哈希列表,再排序输出(菜鸟练习总结)
这是第二篇文章,慢慢总结学习的perl语言 这个程序就是把DATA里面的内容先分割,再存入哈希列表中,在利用哈希的key和value进行排序输出。 #!/usr/bin/perl use warnings; use strict; undef $/; my $file = <DATA>; my @a = split(m/^A\d\d\d/m, $file); shift @a; my ...
2019-07-29 16:06:33 768
原创 perl语言学习第一篇:将文本perl.txt内容读入,再格式化输出(菜鸟小试牛刀)
实习较闲,自学perl,刚看完菜鸟教程,小试牛刀 下面的程序主要是读入perl.txt文件 cat perl.txt 4 karsa 1 uzi 3 xiaohu 2 ming 5 langx 然后格式化输出如下字样 -------------------- id name ------------...
2019-07-26 15:48:03 1008
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人