perl程序(Windows下怎么运行Perl程序显示输出“hello,world“语句)
本文目录
Windows下怎么运行Perl程序显示输出“hello,world“语句
(1)首先,要搭建一个Perl运行的环境:这里用的是Strawberry Perl。在网上下载一个安装就OK了,和常用的windows软件安装一样。这里我的安装路径是: d:\strawberry(2)先检查你的perl是否已经在系统的path环境变量中:开始-运行,输入cmd,然后运行perl -v(注意perl与-v之间有空格不能不加),如果能显示perl的版本,说明你的perl已经在PATH环境变量中;如果显示“不是内部命令也不是外部命令”,那参照以下流程把perl加入PATH环境变量:右键单击我的电脑,选择“属性”,点击“高级选项卡”,单击“环境变量”,在“系统变量”下面去找PATH,然后选中它,单击“”,再添加“d:\strawberry\perl\bin”,然后一路点击确定,就修改好了。再照着上面的方法,验证一下是否添加成功。注意,要在修改完了之后重新打开一个命令行窗口,要不然看不到修改的结果;(3)Perl代码:在windows下用记事本就可以了,如:在记事本里输入如下内容:#! /usr/bin/perlprint “hello,world“;然后保存为后缀为“.pl”的文件;(4)运行Perl程序:开始-运行-cmd,然后用“cd”把路径调到刚才保存perl程序的地方,这里就是输入“ cd d:\perl“(此为之前.pl文件的保存文件夹),最后只需要一个语句就搞定,在出现的 “d:\perl”后输入“ perlex11.pl”(此处的ex11.pl是之前存放perl程序的文件名),即可显示
perl程序中shift的用法
shift ARRAY shift 这个函数把数组的第一个值移出并且返回它,然后把数组长度减一并且把所有的东西都顺移。如果在数组中不再存在元素,它返回 undef。 如果省略了 ARRAY,那么该函数在子过程和格式的词法范围里移动 @_;它在文件范围(通常是主程序)里移动 @ARGV。子过程通常以拷贝它们的参数到词法变量里开始,而 shift 可以用于这个目的: sub marine { my $fathoms = shift; # 深度 my $fishies = shift; # 鱼的数量 my $o2 = shift; # 氧气问题 # ... }总之就是shift没有数组作为参数时,就是移动@_这个默认的参数。perl里经常用这种缺省方法的。
perl程序配置文件如何编写
你可以就用文本文件保存用户名和密码,名字和密码之间用一个不可以用来做名字的特殊符号分隔即可,比如下面这样:user1|pass1user2|pass2根据你的补充说明,好像你只需要一个用户,那么程序就稍微简单一点,外面先学简单的,以后多个用户的处理你能学会的,对于只有一个用户的,程序代码如下:$passfile=’c:/web_admin.txt’; #密码文件open(FD,$passfile);$line=《FD》;close(FD);($username,$password)=split(/|/,$line);#变量获取完毕
perl程序
#!/usr/bin/perluse strict;my %k_v;open FILE, “《input2.txt“;while(《FILE》) { chomp; my ($key, @pos_ary) = (split /\s+/, $_); $k_v{$key} = \@pos_ary;}close FILE;open FILE, “《input1.txt“;open OUT1, “》1.txt“;open OUT2, “》2.txt“;open OUT3, “》3.txt“;open OUT4, “》4.txt“;open OUT5, “》5.txt“;my $key;my $value;while(《FILE》) { chomp; if ( $_ =~ /^》/ ) { $key = (split /\s+/, $_); } else { $value = $_; my ($start, $end) = @{$k_v{$key}}; print OUT1 substr($value, 0, $start), “\n“; print OUT2 substr($value, $start, $end - $start), “\n“; print OUT3 substr($value, $end), “\n“; print OUT4 “》 $key\n“, substr($value, $start - 5, 10), “\n“; print OUT5 “》 $key\n“, substr($value, $end - 5, 10), “\n“; }}close FILE;close OUT1;close OUT2;close OUT3;close OUT4;close OUT5;
文件2全部装入内存,然后遍历文件1,得到结果。
Perl是什么
发明perl的larry wall就说过:“perl可能不好看或者不好闻,但是它能完成任务”。 perl是文本处理语言,它最初就是为了这个目的设计的。 perl是网络编程语言,它内置了socket/client-server协议。 perl是系统管理语言,全球网络很多服务器上就运行着它的脚本。很多时候是单行的脚本。 perl是web脚本编写语言。至今它仍然是最流行的几种web脚本编写语言之一。 perl还可以: 用perl生成代码 用perl(调用tk)编写gui程序。 在c/c++中进行perl编程,在perl中进行c/c++编程 用perl过滤邮件 用perl数据仓库编程 在web上进行搜索 有人说perl无所不能。 ----------------------------------------------------------------------------------------------------- 我个人觉得perl的文本处理能力是无以替代的。它的正则表达式功能之强大是其他编程语言无法达到的。 即使微软的jscript/vbscript在正则表达式这项功能努力仿照和追赶perl,但仍然有很大的差距。 perl里面的哈希结构也是一个十分有趣的东西,vbscript里面对应的是dictionary,但是dictionary有欠直观。 如果你对照一下perl和php,会发现两者程序之间有很多类似的地方,php在产生的时候受到了perl很多的影响, 说php来源于perl也不为过。 perl甚至和vbscript/jscript一样可以编写asp程序。但同时,perl又不仅仅只有web脚本的功能。。。。但我 们很多web程序员用asp/php/jsp在编写基于web的聊天室,用隐藏桢刷新聊天内容的老土办法的时候,实际perl 写的基于socket的chat server程序早就存在了。你甚至不需要用c/c++来做这些复杂的事情,一个perl一百行 代码就可以做到了。 perl一直以来是一个免费的语言。你不用任何费用就可以获得perl世界里面的代码包括perl本身。perl不是由 某个公司大力推广而得到发展的,正如java那样。perl用它自身的力量来发展自己。当我们发现perl的开发调 试工具就可以用perl来写作,就不能不为它的神奇而感动。perl的世界是一个真正的自由的世界。 更多的时候,我觉得看一下perl,也是有很多地方值得借鉴的。有一些编程的方法就可以学过来,然后放到你所
如何运行一个perl程序
首先确定你已经装好了PERL。Windows的话,应该是用Active PERL吧。其次,看你想怎么运行。如果你是用记事本或者UltraEdit 32这样的器写的程序,应该需要在命令行运行。在Win XP下,从开始菜单选择运行,输入cmd,回车,进入命令行界面。然后更改目录到你要运行的程序所在的文件夹(别告诉我你不会用cd命令),输入:perl 你的程序名字 参数然后回车。参数可以没有。如果说bad command,你肯定没装PERL。如果你有ActiveState Komodo这样的专门的IDE,那么他里面自带有运行PERL的工具(前提是你也得装好了Active PERL)。编好程序后,在工具栏里面按那个黑色的三角就可以了,会出来提示输入参数的窗口,确定即可。程序的输入和输出全部在IDE的一个窗口内进行,不需要命令行。另外,如果你尝试直接双击你写的程序(*.pl),那只会导致命令行界面窗口闪一下,什么也看不清。所以我的办法就是,想用命令行运行PERL,就到开始-》运行里面输入cmd那么做。
更多文章:

想问一下var是方差吗?oracle12c和10g varchar类型的区别
2025年3月27日 16:40

homogeneous意思(homogeneous system是什么意思)
2025年3月7日 23:20

filter函数在wps为什么不能用(wps表格不支持files函数怎么办)
2025年3月6日 07:30

android开发是什么(Android开发和JAVA开发有什么区别)
2025年3月16日 06:10

光伏级eva粒子(光伏EVA胶膜主要由哪些原材料和助剂组成)
2025年3月2日 19:30

tomcat配置虚拟主机(如何在Tomcat中配置虚拟主机)
2025年2月28日 12:30