컴퓨터 엑셀 워드 포토숍 구글어스 WINDOWS JAVASCRIPT JAVA C++

 
Previous Post Excel 엑셀] 이번 달은 몇 분기, 몇 사분기 구하기 함수/수식; Quarter of ...PHP 예제] 1, 2, 3, 4분기 구하기 (사분기); Quarter of the Yea...매스매티카 Mathematica, 변수 선언/대입/초기화 방법; Variable매스매티카 Mathematica, 나누기 방법, 나눗셈 기호; Divide매스매티카 Mathematica, 곱하기 방법, 곱셈 기호; MultiplyPHP 예제] 오늘이 올해 몇번째 날인지 구하기; DAY OF YEARExcel 엑셀] 지정 범위 나누기; 특정 범위 나눗셈 방법; Range DivideExcel 엑셀] 지정 범위 곱하기 함수; PRODUCT 곱셈 방법Excel 엑셀] 요일 이름 구하기 함수, 한글/영문 요일명; DAY OF THE WEEK...Excel 엑셀] 년월일 시분초 구하기 함수, 년 월 일 시 분 초 추출; Date Tim...

Perl 펄] 이번 달은 몇 분기, 몇 사분기 구하기 함수; Quarter of the Year

Friday, April 27, 2007

1년을, 3개월씩, 4부분으로 구획지은 것을 "분기(사분기)"라고 합니다.

분기를 구하려면, 그 달(月)의 번호를 3으로 나눈 후, 그 값을 "올림"해 주면 됩니다. 반올림이 아니라 "올림"입니다.

이달, 특정 달이 몇 사분기? 계산 예제


파일명: example.pl
#!/usr/bin/perl
use strict; use warnings;

use POSIX qw( ceil ); # 올림 함수인 ceil 함수를 위해



  ############################################
  # 이번 달이 몇 분기인지 구하기
  #
  my $quarter = ceil(
                       ( (localtime)[4] + 1 ) / 3
                     );

  printf("%d분기\n", $quarter);
  # 이번 달이 4월이면 "2분기"라고 출력됨



  ############################################
  # 특정 달이 몇 분기인지 구하기
  #

  # 7월달은 몇 분기?
  printf("%d분기\n", quarterYear(7));
  # 3분기

  # 10월달은 몇 분기?
  printf("%d분기\n", quarterYear(10));
  # 4분기




# 특정 달을 입력하면,
# 그 달에 해당되는 분기가 반환되는 함수
# 참고로, $_[0] 이것은 함수의 첫번째 파라미터

sub quarterYear {
  return ceil( $_[0] / 3 );
}



▶▶ Perl/펄] 오늘 날짜/현재 시간 구하기 함수, 년월일/시분초; Get Print Date Time Current

0 Comments:

Post a Comment

<< Home RSS 2.0 feed

구글 Google 에서 제공하는 무료 블로그 서비스인 블로거 Blogger 의 인터넷 주소는 www.blogger.com 입니다. Blogger 에 블로그를 만들면, blogspot.com 이라는 주소에 블로그가 생성됩니다.
블로그를 직접 방문하지 않고도 최신 게시물을 구독하려면 RSS 2.0 feed 주소를 리더기에 등록하시면 됩니다.
Categories
Previous Posts
Monthly Archives
Top