perl实例：简单的代码规范化实例

最新推荐文章于 2020-09-25 22:54:24 发布
最新推荐文章于 2020-09-25 22:54:24 发布
阅读量1k 收藏 3
点赞数
分类专栏： perl 文章标签： perl Perl 代码规范化
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/wjlong0318/article/details/8251627
版权

    在学习计算机语言的时候，经常要阅读大量代码，或从网上copy一些代码来学习，但往往copy过来的代码总是不是很规范，要么找不到括号匹配，要么没有统一的换行，空格，使代码难以阅读，刚好正在学习的perl语言强大的文本处理功能，突发灵感，何不如自己动手写一个简单的代码规范实例，来将不规范的代码规范化，闲言少叙，进入正题！

实例名称：代码规范化

实例目的：将不规范化的代码规范化，便于阅读

实例思路：从网上获得的代码往往存在以下几个问题：

空格不统一，换行时，有的空格多，有的空格少；

句首空格总是或多或少

括号不知何时匹配，找到左括号，

最低0.47元/天 解锁文章
俊才星驰
关注
  • 0
    点赞
  • 踩
  • 3
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
perl实例精解中文版
04-21
在实际工作中直接使用《PERL实例精解》(原书第4版)中的示例程序，从而大大节省开发人员的时间，并且能有效地避免编程错误。《PERL实例精解》(原书第4版)内容简洁、示例丰富，非常适合于Perl语言初学者阅读，对于Perl程序员，也有很大的参考价值。
JAVA上百实例源码以及开源项目源代码
09-17
　Tcp服务端与客户端的JAVA实例源代码，一个简单的Java TCP服务器端程序，别外还有一个客户端的程序，两者互相配合可以开发出超多的网络程序，这是最基础的部分。 递归遍历矩阵 1个目标文件，简单！ 多人聊天室 3...
perl实例分析教程
hendyyou的专栏
09-26 1507
Normal 0 7.8 磅 0 2 false false false MicrosoftInternetExplorer4 <!-- /* Sty
perl代码库
yangxueyong的专栏
09-06 143
待整理...
perl程序例子
xyqzki的专栏
04-03 1777
Template: #!/user/bin/perl -w use strict; use warnings; my $jfjdlsfl = ; Example: 读取文件中的字符串，将每个字符串中的小写字母换成大写字母 #!/user/bin/perl -w use strict; use warnings; ##注意加这些title open
【perl】例子记录
lbt_dvshare的博客
09-23 431
#!/usr/bin/perl while(&lt;STDIN&gt;){ chomp; if(/(?&lt;name1&gt;\b\w+a\b)/g){ print "Matched:|$`&lt;$&amp;&gt;$'|\n"； print "\'word\' contains \'$+{name1}\'";#注意反向引用 } else{ prin...
Perl 实例精解（第三版）.pdf
11-06
15．5．6 范例15-7：ex7．pl Oracle上的Perl DBI简单查询 15．5．7 范例15-8：ex8．ploracle上persons．sql的Perl DBI 15．6 练习：非编程 练习15 使用MSS 练习16 在MSS中执行persons．p1 练习17 使用Oracle ...
Perl_intro：针对示例的Perl 5入门课程，面向VLSI工程师
02-05
2. **自动化**：Perl可以用于自动化重复性任务，例如运行模拟、生成报告和验证设计参数。 3. **接口集成**：Perl可以轻松地与各种工具和库进行交互，这对于集成不同阶段的VLSI流程至关重要。 4. **正则表达式**：...
Archive::Rar (perl)-开源
05-03
`Archive::Rar`模块提供了读取、提取、列出和创建RAR档案的功能，使得在Perl环境中对RAR文件进行操作变得简单。 **开源软件：**标签“开源软件”表明`Archive::Rar`遵循开源许可证，意味着源代码是公开的，任何人都...
Perl脚本示例程序
auvKone
04-29 1317
1.打印环境变量 #!/usr/bin/perl while(($key, $value) = (each %ENV)) { print "$key=$value\n" } %ENV是一个哈希变量，存储所有的环境变量。
Perl 编程实例
weixin_34226706的博客
06-11 347
2019独角兽企业重金招聘Python工程师标准>>> ...
数字IC笔试题（芯启源）——Perl 脚本应用实例
zgezi的博客
09-25 1960
#!usr/bin/perl -w use strict; my $Error_cnt = 0; my $Info_cnt = 0; my $file = "./raw.txt"; my @Error; my @Info; my $name; my $id ; my $date; my $data; my $error; my $info; open (TEST,"<",$file); while (my $line = <TEST>) { # chomp $line; # .
Perl解析JSON数据精解
北雨南萍
03-04 7729
简介: JSON(JavaScript Object Notation) 是一种轻量级的数据交换格式。 它基于JavaScript（Standard ECMA-262 3rd Edition - December 1999）的一个子集。  JSON采用完全独立于语言的文本格式， 但是也使用了类似于C语言家族的习惯（包括C, C++, C#, Java, JavaScript, Perl,
perl 程序 -e 选项
得峰的专栏 [网络收藏]
04-20 6472
交互式编程你可以在命令行中使用 -e 选项来输入语句来执行代码，实例如下：交互式编程你可以在命令行中使用 -e 选项来输入语句来执行代码，实例如下：$ perl -e 'print "Hello World\n"'输入以上命令，回车后，输出结果为：Hello World...
perl的”定义或“例子
wgz7747147820的博客
05-23 416
[root@rwsoda203db1 perl_tidb]# cat p.pl #!/usr/bin/perl use strict "subs"; use strict; use v5.16; #//定义或 如果$child_id已定义 则返回$child_id,如果$child_id undef，则执行die my $child_id = fork() // die "cann't for...
一个Perl文本处理实例
SHark专栏
12-24 3720
假设存在file1, file2两个文本文件， 文件每行格式为：| .* | .*;要求：求出所有在file2文件中出现的行， 且仅保留双"|"之间的内容。如： 若存在 |adfdf| dofijaosdjioaf 于file2, file1中不存在该项，则该返回 |adfdf|参考例程:#!/usr/bin/perluse strict;use warnings;die "lack compar
perl 常用语句
flykobe的技术博客
02-16 1893
1、良好的编程习惯    #! /usr/bin/perl   use warnings;    use diagnostics;  use strict;   #  更加严格，强制声明变量是使用my（超过一屏建议使用strict）  # 在调试代码的时候，最好加上这两句，打印出所有的warning及详细说明  2、print接受的参数类型（注意
rename（Perl语言版本） 详解
wayne17的博客
03-19 3963
rename 是 linux 系统中的一个小工具，主要用于更改文件名，批量改更见效率！注意结合文件名的通配符使用（?, *）！ 更改文件名 rename a.txt c.txt 查找替换文件名字串 将文件名中 ‘abc’ 换成 ‘4’： rename ‘s/abc/4/’ * 去除某种文件后缀名(.cpp为例)： rename ‘s/\.cpp$//’ * # ’\‘ 为转移字符，'\.' 转...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值