perl一行式程序系列文章:Perl一行式 所有行的行号 $ perl -pe '$_ = "$. $_"' file.log $ perl -ne 'print "$. $n"' file.log 这里涉及了一个特殊变量$.. 这个特殊变量代表的是当前处理行的行号.对于Perl的一行式来说,通过<>隐式打开的文件句柄默认不会关闭,所以如果参数中有多个文件,进入下一个文件时行号不会重置. 例如: $ cat a.txt aaa bbb $ cat b.t…

perl一行式程序系列文章:Perl一行式 对于Perl的一行式perl程序来说,选择要输出的.要删除的.要插入/追加的行是非常容易的事情,因为print/say决定行是否输出/插入/追加/删除.虽然简单,但对于广泛应用在sed的示例还是可以拿到这里来讨论一番. 因为输出/删除/插入/追加行都是通过print/say在不同条件下的操作,所以本文只会介绍输出操作,删除/插入/追加其实都是同样的原理. 输出第一行 $ perl -lne 'print;exit' file.log 输出第13行 $…

perl一行式程序系列文章:Perl一行式 假如文件file.log内容如下: root x 0 0 root /root /bin/bash daemon x 1 1 daemon /usr/sbin /usr/sbin/nologin bin x 2 2 bin /bin /usr/sbin/nologin sys x 3 3 sys /dev /usr/sbin/nologin sync x 4 65534 sync /bin /bin/sync 每行后加一空行 $ perl -pe '$…

perl一行式程序系列文章:Perl一行式 获取每行最后一个字段 $ perl -alne 'print $F[$#F]' file.log 这里涉及到了选项"-a".数组@F.这里同时还会解释-F选项,它和-a常一起使用. 选项"-a"和awk的自动字段分割一样,会自动将每行数据划分为几个字段.划分字段的分隔符由-F选项指定.如果没有指定-F,则默认以空白符号进行分割(连续空格被认为是单空格). 分割后的元素全都收集到一个数组@F中,所以第一个字段的内容是$F[0…

perl一行式程序系列文章:Perl一行式 文本大小写转换 全部字符转换成大写或小写,有几种方式: # 转大写 $ perl -nle 'print uc' file.log $ perl -ple '$_ = uc' file.log $ perl -nle 'print "\U$_"' file.log # 转小写 $ perl -nle 'print lc' file.log $ perl -ple '$_ = lc' file.log $ perl -nle 'print &q…

//Java使用FileReader(file).readLine()读取文件,以行为单位,一次读一行,一直读到null时结束,每读一行都显示行号. public static void readFileByLines(String fileName) { File file = new File(fileName); BufferedReader reader = null; try { System.out.println("以行为单位读取文件内容,一次读一行"); reader…

原因是:在jquery_easyui.js 看方法 insertRow : function(_736, _737, row) 以下小代码算行号,if (opts.pagination) { _73c += (opts.pageNumber - 1) * opts.pageSize; }解决方法:每次页数为0的时候加载数据,先把页数设置为1 1.首先设置页码为1 if($("#id").datagrid("getRows").length == 0 ){$(&quo…

码云地址: https://gitee.com/YuRenDaZ/WordCount 个人PSP表格: PSP2.1 PSP阶段 预估耗时 (分钟) 实际耗时 (分钟) Planning 计划 180 120 · Estimate · 估计这个任务需要多少时间 180 120 Development 开发 580 440 · Analysis · 需求分析 (包括学习新技术) 180 60 · Design Spec · 生成设计文档 40 30 · Design Review · 设计复审 (…

nl命令读取 file 参数(缺省情况下标准输入),计算输入中的行号,将计算过的行号写入标准输出.在输出中,nl命令根据您在命令行中指定的标志来计算左边的行.输入文本必须写在逻辑页中.每个逻辑页有头.主体和页脚节(可以有空节).除非使用-p选项,nl 命令在每个逻辑页开始的地方重新设置行号.可以单独为头.主体和页脚节设置行计算标志(例如,头和页脚行可以被计算然而文本行不能).其默认的结果与cat -n有点不太一样, nl 可以将行号做比较多的显示设计,包括位数与是否自动补齐0等等的功能. 语法…

定义好了一个可以输出带颜色行号以及行数据的函数print_with_line_num,f()是测试函数.在f()函数中,读取文件并输出读取的每一行数据,但根据参数选项决定是普通输出行还是同时输出带颜色行号的行数据. 这可以当作是偏函数.闭包.作用域的一个用法示例. 脚本内容如下: #!/usr/bin/perl -w use strict; use 5.010; # print string with colored line_num # arg1: line num # arg2: strin…