代码之家 › 专栏 › 技术社区 › 69 420 1970

“**”在这个Perl脚本中扮演什么角色?

perl

69 420 1970 · 技术社区 · 7 年前

我有以下shell脚本:

eval{print "Just ";} * * {print "Another ";} * * {print "Perl ";} * * {print "Hacker\n";}

以及更多变体:

@${print "Just ";} * * {print "Another ";} * * {print "Perl ";} * * {print "Hacker\n";}
$${print "Just ";} * * {print "Another ";} * * {print "Perl ";} * * {print "Hacker\n";}
do{print "Just ";} * * {print "Another ";} * * {print "Perl ";} * * {print "Hacker\n";}
$#{print "Just ";} * * {print "Another ";} * * {print "Perl ";} * * {print "Hacker\n";}

什么是 * * 做(如果我改变,它也会起作用 ** 到 & & .)

1 回复 | 直到 5 年前

ysth 7 年前

第一个 * 每一对都是乘法;第二种是全局解引用。所以没什么有用的。

具有 & & 第一个是按位and,第二个是子例程解引用(and调用)。我不知道为什么使用规范真值(由print返回)作为代码引用并调用它不会出错;我早就料到了 &{!0} 要出错,请执行以下操作 &{"1"} 用于 Undefined subroutine &main::1 ;相反,这似乎是一个禁止的行动。

推荐文章

Manny · 如何比较Perl中的字符串?

3 年前

BioRod · 我不能用Perl打印键和值

3 年前

user17227456 · Perl CLI代码无法追加字符串行

3 年前

LearnToBeBetter · 读取文件,搜索字符串,打印字符串

3 年前

KJ7LNW · 一些波斯语文本的宽字符印刷,但其他文本则没有

3 年前

Amit M · 如何用FFI:Platypus替换cpan Perl实用程序P5NCI

3 年前

con · 如何搜索大型数据结构并返回一系列给出特定值的键/数组?

3 年前

rohithguptha potti · 在LINUX操作系统上执行一些Perl命令时,这些模块可以在LINUX中使用,也可以不在LINUX中使用

3 年前

Tonys AnsonÄ« Misirgis · 当“网站”选项卡关闭时,服务器如何知道关闭websocket的连接

7 年前

Pranay Nanda · 使用regex解析许可证文件

7 年前