return $template; 函数返回值问题 ?

bst

sub cut2fmt {
    my(@positions) = @_;
    my $template   = '';
    my $lastpos    = 1;
    foreach $place (@positions) {
        $template .= "A" . ($place - $lastpos) . " ";
        $lastpos   = $place;
    }
    $template .= "A*";
   
}

$fmt = cut2fmt(8, 14, 20, 26, 30);
print "$fmt\n";
在上边的函数中$template是不是在调用函数的时候存储的数值是@temolate={A7,A6,A6,A6,A4,A*}; 不和c语言中的一样只能存储一个数值.

apile

$template是個字串...屬於 scalar並非array...
跟C一樣只能存儲一個數值
.是個字串連結的operator...
跟java裡面的+同義...