perl 运算符

最新推荐文章于 2024-12-13 08:30:00 发布

scan724

最新推荐文章于 2024-12-13 08:30:00 发布

阅读量585

点赞数

CC 4.0 BY-SA版权

分类专栏： Perl开发

本文链接：https://blog.youkuaiyun.com/zhaoyangjian724/article/details/41040799

Perl开发专栏收录该内容

46 篇文章 ¥39.90 ¥99.00

订阅专栏

这篇博客介绍了Perl中用于字符串比较的`eq`运算符和数字比较的`==`运算符，以及如何使用`split`函数提取字符串中的特定元素。此外，还提到了正则表达式的或运算符`|`在匹配字符串中的应用。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

11111[root@jhoa bin]# cat 2.pl 
$var="cd";
if ($var eq "cd"){print "11111"};

[root@jhoa bin]# perl 2.pl 
11111[root@jhoa bin]# 


字符窜相等用 eq

数字相等用==

my $command="cd /tmp";
print "\$command  is $command:\n";
my $newdir=(split /\s+/,"$command")[1]; ---取第2个元素
print "\$newdir is $newdir:\n";


[root@jhoa bin]# perl a1.pl 
$command  is cd /tmp:
$newdir is /tmp:


或运算符
[oracle@jhoa ~]$ cat s3.pl 
$i = "bfsdf";
if ($i =~ /a|b/){print "11111\n";}


[oracle@jhoa ~]$ perl s3.pl 
11111