[ 已解决 ] [Perl]请问，空的花括号 {} 能运行吗？

zzz19760225

kuohao.pl

1. {}
   
2. <STDIN>;
   

复制代码

输出

1. perl ./kuohao.pl
   
2. syntax error at ./kuohao.pl line 2, near ">;"
   
3. Execution of ./kuohao.pl aborted due to compilation errors.
   

复制代码

按照AI自动信息deepseek的说法，是应该可以的，但是实际执行卡在BOM字头什么的。
请问，如果按照语句结构，是可以执行的吗？

523066680

你打开警告，去掉STDIN

1. use Modern::Perl;
   
2. {}
   

复制代码

就有提示什么问题：
Useless use of anonymous hash ({}) in void context at line 2.

被识别为了匿名的 哈希 {}，这个哈希没有意义 （没有赋值给某个变量，没有参与任何操作）
想要让其运行通过，在{}右侧加;分号，告诉解释器这是一个代码块

`{};`

又或者在里面加分号，

`{;}` 这也是代码块

既然是被识别为了 匿名哈希，那么匿名数组应该也有类似情况

1. use Modern::Perl;
   
2. []

复制代码

Useless use of anonymous array ([]) in void context

因为 [] 只能是和数组有关的东西，所以就算 `[];` 也无济于事，依然提示错误。除非是正常的赋值场景、返回值场景。

zzz19760225

多谢帮助，否则要在坑里转很久，也找不到原因。
deepseek的说法:

1. # 这些测试在不同Perl版本中行为一致
   
2. 
   
3. # 1. 空代码块 - 始终有效
   
4. { }  
   
5. print "空代码块没问题\n";
   
6. 
   
7. 总结
   
8. 
   
9.     { } - ✅ 可以执行，空代码块，什么都不做
   
10. 
    
11.     ( ) - ❌ 语法错误，不能单独使用（除非在特定上下文中如函数参数）
    
12. 
    
13.     < > - ✅ 可以执行，返回空列表，相当于glob("")
    
14. 
    
15.     <>; - ✅ 语法正确，但会阻塞等待输入（钻石操作符）
    
16. 
    
17. 所以您测试的结果会是：花括号、尖括号、钻石操作符都能通过语法检查，只有圆括号会报语法错误。
    

复制代码

上一次好像也是一个问题，被引导到BOM，循环无解，感觉可能走岔了，所以没有办法，只好求助。
谢谢帮助！