perl subroutine 썸네일형 리스트형 [Perl] 홀수 짝수 Subroutine 전달된 1개의 인수의 짝수홀수를 조사하여, 홀수라면 [Odd], 짝수라면 [Even]이라고 출력하는 서브루틴을 작성하여, http://seungngil.tistory.com/entry/Perl%ED%99%80%EC%88%98-%EC%A7%9D%EC%88%98-%EA%B5%AC%ED%95%98%EA%B8%B0의 과제를 그 서브루틴을 사용해도록 변경하여라. use strict;use warnings; my $num; print "Please enter the number. "; $num = ;chomp $num; OddEven ($num); sub OddEven {my $num = shift;for (my $i = 1; $i 더보기 [Perl] Subroutine 전달된 한개의 인수의 절대값을 값으로서 되돌려주는 서브루틴을 작성하여, http://seungngil.tistory.com/entry/perl-%EC%A0%88%EB%8C%80%EA%B0%92-%EA%B5%AC%ED%95%98%EA%B8%B0를 그 서브루틴을 사용하게 변경하여라. use strict;use warnings; my $str; while (1) { print "Please enter the number.(Enter exit at the end) "; $str = ; chomp $str; if ($str eq "exit" || $str eq "") { last; } if ($str =~ /[a-zA-Z]/) { print "Not number.\n"; next; } print (Absolute.. 더보기 이전 1 다음