perl 반복문 안에서 마지막 문장을 리턴하는건 불가능 한가요?

kilo32의 이미지

이제 막 learning perl 5판 보면서 공부중인 학생입니다. 사용자 함수 부분을 보던 중 궁금한 점이 생겨 문의드립니다.

#!/usr/bin/perl -w
use 5.010;
use strict;
 
say &total(1, 2, 3);
 
sub total {
	foreach (@_) {
		$sum += $_;
	}
	#$sum;			#반환값
}

인자들을 모두 더해 반환해주는 함수입니다. 여기서 foreach에서 마지막으로 실행한 $sum += $_; 을 통해 반환하고 싶었습니다. (주석처리된 $sum이 아닌)

하지만, 구글에 검색해보니 루프제어문 안에서는 마지막 문장이 반환되지 않는다고 하더라고요...
http://stackoverflow.com/questions/7283868/returning-value-from-foreach-in-subroutines

그래도 혹시나 방법이 있지 않을까해서 질문 올려봅니다.

익명 사용자의 이미지

그냥 $sum; 이 보기 싫다면 return $sum; 을 써보심이 어떤지요.