(질문)perl 함수형 예시를 좀 바꾸어 보려다..실패
글쓴이: doodoo / 작성시간: 목, 2015/05/21 - 10:07오전
인터넷에 있는 FP_intro.pdf 에 있는내용을 보다 조금 바꾸어서 해보려다 꽉 막혀 버렸는데요...
#!/usr/bin/perl use strict; use warnings; use Time::Piece; use Time::Seconds; my $first_day = Time::Piece->strptime("2015-01-01", "%Y-%m-%d"); my $every_day = day_iterator($first_day); sub day_iterator { my $day = shift; return sub{ my $today = $day; $day += ONE_DAY; return $today; } } print $every_day->(),"\n"; print $every_day->(),"\n"; print $every_day->(strftime("%c"),"\n";
everyday 호출의 출력형태가 맘에 안들어 바꾸어 보려다 마지막 strftime 함수를 어떻게
적용해야 할지 몰라서요
어쨓든 print $every_day->(strftime("%c"),"\n"; 라인은 에러를 뱉어냅니다.
어떤 답변도 미리 감사드립니다.
Forums:
댓글 달기