perlstringfunctions函数是执行特定操作的一系列语句。Perl包含许多在信息操纵中有用的预定义函数。在Perl中,您将函数用作表达式。一旦Perl看到脚本中的函数调用,就会执行函数行。Perl函数可以分组为以下内容:

使用Udemy.com的教程从头开始从头开始

字符串函数:字符串是字符的组合。字符串没有限制,可以是任何大小,可以包含任何字符、符号或单词。在Perl中,它是通过将它们放在双引号中或与' q '函数一起定义的。

例子

$hello = " hello "我是字符串;$user = q^I也是字符串^;

了解有关Udemy.com的Perl的更多信息

Perl中的字符串函数:

Chomp:从字符串或字符串数组中删除尾随字符。它只删除传递给它的字符串末尾的空格。它返回删除的字符数。

句法:

chompvariable_name chomp (LIST) chomp

例子:

$string1 = "我是字符串";$retval = chomp($string1);//收集最后一个空格print " Chomp String is: $string1\n";print "删除的字符:$retval\n";$string1 = "I am String \n";$retval = chomp($string1);//收集最后一个空格print " Chomp String is: $string1\n";print "删除的字符:$retval\n";

输出:

Chomp String是:我是String

删除字符:0

Chomp String是:我是String

删除角色:1

切:这个函数从字符串或字符串数组中删除最后一个字符。函数返回被删除的字符。

句法:

Chopvariablied_name Chop(List)Chec

例子:

$string1 = "我是字符串";$retval = chop($string1);//打印"Chop String is: $string1\n";print "删除的字符:$retval\n";

输出

Chop String是:我是字符串

删除角色:g

cur:此函数将ASCII或Unicode值转换为等效字符。它返回转换后的字符。

句法:

空空的EXPR

例子:

print chr(35);//将ASCII值转换为字符print "\n";打印杆(38);打印“\ n”;打印杆(40);打印“\ n”;打印杆(0 x263a);

输出

LCFirst,UCFirst,LC,UC,长度:

在Udemy.com上了解更多关于Perl的信息。

句法:

lcfirst EXPR lcfirst ucfirst EXPR ucfirst length EXPR length lc EXPR lc uc EXPR uc

例子:

$str = 'HeLlo';打印lc str美元;//返回小写打印"\n";打印uc str美元;//返回大写打印"\n";打印长度str美元;//返回字符串的长度print "\n";打印lcfirst str美元;//返回字符串中第一个小写字母print "\n";打印ucfirst str美元; // Returns first letter uppercase in string print "\n";

输出:

你好

你好

5

你好

你好

指数:这个函数接受两个字符串作为参数,并返回第一个字符串中第二个字符串出现的位置。如果给出了位置索引,则从该索引开始搜索。如果不匹配,则返回-1。字符匹配区分大小写。

句法:

索引str,substr,位置索引str,substr

例子:

$string = "Jack and Jill went up to the hill";$ index = index($ string,'tout');//返回WAT打印的索引“以$ Index \ n找到的字符串”;$ index = index($ string,'dows',15); //将搜索“WED”从起始索引15打印“以$ Index \ n找到的字符串”;$ index = index($ string,'tout');打印“以$ index \ n找到的字符串”;

输出:

14岁发现的绳子

在-1处找到的字符串

在-1处找到的字符串

rindex:它与index函数相反,返回找到的字符的最后一次出现,也就是说,它从右到左搜索字符串中的字符或子字符串。

句法:

rindex STR,SUBSTR,POSITION rindex STR,SUBSTR

例子:

$string = "Jack and Jill went up to the hill";$index = rindex ($string, 'went');//将搜索子字符串"went" print " string found at $index\n";$index = rindex ($string, 'to');//将搜索子字符串"到"打印"在$index\n中找到的字符串";在14号找到的弦在22号找到的弦

示例2:查找所有子字符串

我的$ abc =“杰克吉尔去了山杰克瀑布和杰克斯微笑着”;我的$ POS =长度($ ABC)-1; //计算字符串打印的长度“在位置找到的插孔:”;虽然(1){$ POS = RINDEX($ ABC,“杰克”,$ POS);持续if($ pos <0);打印$ POS  - “”;打印“\ n”;

输出:

杰克在职位找到:38 23 0

字符串的子串:最重要的字符串函数。它与索引函数相反,而索引给出子字符串的位置此函数检索并返回子字符串。它基本上用于从预定义的索引位置提取子字符串。

句法:

substr STR, OFFSET, LENGTH, replace substr STR, OFFSET, LENGTH

例子:

$ temp = substr(“杰克和吉尔”,4);//将在索引后返回完整的字符串第4页打印“子字符串值是$ temp \ n”;$ temp = substr(“杰克和吉尔”,5,3); //从5开始返回长度为3的子字符串打印“子串值是$ temp \ n”;$ temp = substr(“杰克和吉尔”,5,千斤顶);

输出:

子字符串值是和吉尔

子字符串值是和

例2:

$names = "Jack和Jill是敌人";打印”美元的名字\ n”;Substr ($names, 18, 7) = "friends .//“朋友”将从索引18替换字符串中的“敌人”打印“$名称\ n”;

输出:

杰克和吉尔是敌人

杰克和吉尔是朋友

特色课程

Perl编程入门

最后更新了4月2021年

  • 3.5小时
  • 57个讲座
  • 各级
4.4 (6)

学习perl编程初学者|由Rajan Singh.

探索课程

Perl学生也学习

赋予你的团队。引领行业。

使用Udemy for Business订阅在线课程库和数字学习工具。

请求演示