use List::Util qw[min max];
print(min(4,6) . "\n");
print(max(1, 2, 3, 4, 5, 6) . "\n");
print(max(666) . "\n");
출처 : Min and max functions in Perl
Monday, December 31, 2012
Perl 에서 max min function 쓰는 법
max(), min() 함수를 쓰려면 다음과 같이 먼저 로딩을 해야 한다.
Labels:
Perl
Subscribe to:
Post Comments (Atom)
No comments:
Post a Comment