设为首页 收藏本站
查看: 804|回复: 0

[经验分享] 修改文件vim 插件:perl-support的修改和使用

[复制链接]

尚未签到

发表于 2015-12-28 13:20:11 | 显示全部楼层 |阅读模式
  发一下牢骚和主题无关:
  

vim perl-support的修改
  在vim下写perl代码肯定离不开的就是perl-support这个插件,我在前面专门 说过这个的安装方法,其实如果读vim熟习了以后,完全没有了事先的害怕和不知 所措,按照readme自己处理。 我们明天主要说的是,对perl-support中不爽 的地方,停止修改
  



Table of Contents




  • 1 修改规则
  • 2 修改1 \i系列

    • 2.1 \ii \io

      • 2.1.1 修改/.vim/perl-support/templates/idioms.templates


    • 2.2


  • 3 修改2 \s系列
  • 4 经常使用perl-support快捷键总结
  



1 修改规则


  <CURSOR>:代表,使用hot keys以后光标所在的位置。
  两个竖中间加上一个名称 :这个是管道的传递名称
  ==:包含了名称,快捷键等



2 修改1 \i系列


  \i也就是hot keys中以\i扫尾的快捷命令



2.1 \ii \io


  用过perl support的都晓得,这两个命令分别是打开'读入‘的句柄文件和打开 输出的’句柄‘文件。但是你使用以后会发现,这个足足占了8行的地方,这个里面 有很多重复的空话,我们完全可以停止删减,加上open和close 三行是我可以 容忍的。



2.1.1 修改/.vim/perl-support/templates/idioms.templates


  经过查看,总算发现是这个文件来控制。这里一共是一个68行的文件。我们要修改 在36行。我们首先来看一些,有那些内容:

1:  my $|FILEPOINTER|_file_name = '<CURSOR>';#input file name
2:  
3:  open my $|FILEPOINTER|,'<',$|FILEPOINTER|_file_name
4:  or die "$0 : failed to open input file '$|FILEPOINTER|_file_name' "$!\n";
5:  
6:  <SPLIT>{-continue_here-}
7:  close $|FILEPOINTER|
8:  or warn "$0 " failed to close input file '$|FILEPOINTER|_file_name' "$!\n";

  下面是渐渐的8行内容,你说打开一个输入文件轻易吗?每方法,我们完全可以自己精简:

1:    第一行,my $|FILEPOINTER|_file_name太长了,前面直接用个in表示,当然前面也要改
2:    第二行删除
3:    第三行:open my $|FILEPOINTER|,'<',$|FILEPOINTER|_in or die "failed open\n";
4:    然后到close一行:
5:    这个close 前面的warn,却是没有遇到过,所以直接把前面的删除
6:    close $|FILEPOINTER|;
7:    详细的内容如下:
8:  
9:  = Idioms.open input file == map:ii, sc:i ==
10:  my      $|?FILEPOINTER|_in = '<CURSOR>';                # input file name
11:  open  my $|FILEPOINTER|, '<', $|FILEPOINTER|_in or die "failed open\n";
12:  close  $|FILEPOINTER|;
13:  
14:  == Idioms.open output file == map:io, sc:o ==
15:  my      $|?FILEPOINTER|_out = '<CURSOR>';               # output file name
16:  open  my $|FILEPOINTER|, '>', $|FILEPOINTER|_out or die  "failed open$!\n";
17:  close  $|FILEPOINTER|;

  这里只是根据我自己的喜好来修改的,大家晓得怎么修改了以后完全可以自己折腾。 这样就可以了,不用搞的太复杂。让人看起来头晕。



2.2




    每日一道理
有一首诗最为动人,那就是青春;有一段人生最美丽,那就是青春;有一道风景最为亮丽,那就是青春。青春,不要说已疲惫,也许你的幻想曾被现实无情毁灭,也许你的追求毫无结果,但你应该相信,没有寒风的洗礼,哪来万紫千红的春天,没有心的耕耘,哪有累累硕果?


3 修改2 \s系列


  在hot keys 中对应的Statements,对应的是statements.templates 这里的修改纯属个人的编程习惯。 我喜欢大括号单独有一行。在这个文件里修改就可以了。
  



4 经常使用perl-support快捷键总结


  这里面的快捷键都上百了,是在记忆无限,所以还是找了几个经常使用的,记录下来, 作为参考

\cfr添加注释
\ipprint “\n";
\io \iiopen
\rs检查语法错误
\rr运行程序
  Date: 2013-05-12 15:17:16 CST
  Author: gaorongchao
  Org version 7.8.11 with Emacs version 24
  Validate XHTML 1.0
  文章结束给大家分享下程序员的一些笑话语录:
那是习惯决定的,一直保持一个习惯是不好的!IE6的用户不习惯多标签,但是最终肯定还是得转到多标签的浏览器。历史(软件UI)的进步(改善)不是以个人意志(习惯)为转移的!

运维网声明 1、欢迎大家加入本站运维交流群:群②:261659950 群⑤:202807635 群⑦870801961 群⑧679858003
2、本站所有主题由该帖子作者发表,该帖子作者与运维网享有帖子相关版权
3、所有作品的著作权均归原作者享有,请您和我们一样尊重他人的著作权等合法权益。如果您对作品感到满意,请购买正版
4、禁止制作、复制、发布和传播具有反动、淫秽、色情、暴力、凶杀等内容的信息,一经发现立即删除。若您因此触犯法律,一切后果自负,我们对此不承担任何责任
5、所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其内容的准确性、可靠性、正当性、安全性、合法性等负责,亦不承担任何法律责任
6、所有作品仅供您个人学习、研究或欣赏,不得用于商业或者其他用途,否则,一切后果均由您自己承担,我们对此不承担任何法律责任
7、如涉及侵犯版权等问题,请您及时通知我们,我们将立即采取措施予以解决
8、联系人Email:admin@iyunv.com 网址:www.yunweiku.com

所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其承担任何法律责任,如涉及侵犯版权等问题,请您及时通知我们,我们将立即处理,联系人Email:kefu@iyunv.com,QQ:1061981298 本贴地址:https://www.yunweiku.com/thread-157511-1-1.html 上篇帖子: Foswiki 1.1.7 发布,Perl 开发的 Wiki 系统 下篇帖子: Perl Audio Converter 3.2.0
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

扫码加入运维网微信交流群X

扫码加入运维网微信交流群

扫描二维码加入运维网微信交流群,最新一手资源尽在官方微信交流群!快快加入我们吧...

扫描微信二维码查看详情

客服E-mail:kefu@iyunv.com 客服QQ:1061981298


QQ群⑦:运维网交流群⑦ QQ群⑧:运维网交流群⑧ k8s群:运维网kubernetes交流群


提醒:禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.


本站大部分资源是网友从网上搜集分享而来,其版权均归原作者及其网站所有,我们尊重他人的合法权益,如有内容侵犯您的合法权益,请及时与我们联系进行核实删除!



合作伙伴: 青云cloud

快速回复 返回顶部 返回列表