my @escaped = "asteriskasterisk hash access unpack_func"; # 是一个元素的赋值25 unless( $escaped[1] ){ 26 print "\$escaped[1] is undef."; 27 }输出:$escaped[1] is undef.