Thursday, January 25, 2007
Perl/펄] 오늘이 올해 몇 번째 날? 구하기/출력; get DAY OF YEAR
오늘이 이번 해(YEAR)에서, 몇 번째 날(DAY OF YEAR)인지, 펄 스크립트로 구하는 방법입니다. 이 프로그램만 있으면 이제 달력을 보며 일일이 날을 세지 않아도 됩니다.
파일명: day.pl
사실상 1줄짜리 프로그램입니다.
(localtime)[7] 이, 오늘이 올해 몇 번째 날인지를 반환합니다.
펄은 1월1일을 0 으로 간주하는데, 더 직관적으로 나오도록, 또한 엑셀과 같은 값이 나오도록,
+1을 하여, 1월1일을 1로 했습니다.
참고: ▶▶ Excel/엑셀 VBA] 오늘이 올해 몇 번째 날? 구하기/출력; get DAY OF YEAR
실행 결과 화면:
(오늘이 2007-01-25일일 경우)
(오늘이 2007-12-31일일 경우)
▶▶ Perl/펄] 오늘 날짜/현재 시간 구하기 함수, 년월일/시분초; Get Print Date Time Current
오늘이, 이번 해의 몇째 날인지 구하기 예제
파일명: day.pl
#!/usr/bin/perl
use strict; use warnings;
printf("오늘은 올해의 몇번째 날: %d\n", (localtime)[7] + 1);
use strict; use warnings;
printf("오늘은 올해의 몇번째 날: %d\n", (localtime)[7] + 1);
사실상 1줄짜리 프로그램입니다.
(localtime)[7] 이, 오늘이 올해 몇 번째 날인지를 반환합니다.
펄은 1월1일을 0 으로 간주하는데, 더 직관적으로 나오도록, 또한 엑셀과 같은 값이 나오도록,
+1을 하여, 1월1일을 1로 했습니다.
참고: ▶▶ Excel/엑셀 VBA] 오늘이 올해 몇 번째 날? 구하기/출력; get DAY OF YEAR
실행 결과 화면:
(오늘이 2007-01-25일일 경우)
D:\Z>day.pl
오늘은 올해의 몇번째 날: 25
D:\Z>
오늘은 올해의 몇번째 날: 25
D:\Z>
(오늘이 2007-12-31일일 경우)
D:\Z>day.pl
오늘은 올해의 몇번째 날: 365
D:\Z>
오늘은 올해의 몇번째 날: 365
D:\Z>
▶▶ Perl/펄] 오늘 날짜/현재 시간 구하기 함수, 년월일/시분초; Get Print Date Time Current
tag: perl
Perl | 펄
<< Home