复制代码 代码如下:
sub test {
    my $head = "abc";
    my $tail = "def";
    my $full = "${head}_${tail}";
    print $full, "\n";
}

直接写成下面这样，在strict模式下是无法通过的。
复制代码 代码如下:
my $full = "$head_$tail";