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

 
Previous Post [QnA] 웹스터 영영사전/시소러스(동의어,반대말 사전)의 주소는? : Merriam-We...리눅스/유닉스용 C언어 컴파일러 다운로드 하는 곳은? - GNU Project GCC[C#-C샤프 기초 예제] 문자열(Hello, World) 출력하기, 명령프롬프트(도스창)...[구글어스4] 부산 해운대 해수욕장 백사장 나옴 / 구글어스 베타4 설치법 - Google...[Perl] 펄로, 현재 날짜(연월일)와 시분초 쉽게 다루는 서브루틴: GetTimeStr...[QnA] C#(C샤프) 소스의 기본 확장자는? C샤프 컴파일러의 파일명은?[고전 게임 QnA] DOOM / DOOM2 의 무적키는? - God modepcre.dll / libiconv2.dll 등의 파일 다운로드 하는 곳? / 파일이 없다...[QnA] .xls (XLS) 라는, 확장자의 파일은 무엇입니까?[추억의 스샷] HWP v1.5 (아래아한글 1.5) - 1991년의 워드프로세싱 환경

[Perl/펄] 실수 반올림하여 정수 만들기; RoundToInt 함수

Monday, July 24, 2006

청소년 성장 드라마 '반올림'이 아니고, 소수점을 가진 숫자를 정수로 반올림하는 것입니다.

펄의 int 함수는 소수점 이하를 잘라버리기만 하지, 반올림을 하지 않더군요.


#!/usr/bin/perl
use strict; use warnings;


print &RoundToInt(2.4676);


sub RoundToInt {
  int($_[0] + .5 * ($_[0] <=> 0));
}


RoundToInt 라는 한 줄짜리 함수가 반올림 함수입니다.


2.4676 을 입력하면 2가 나오고
2.5676 을 입력하면 반올림하여 3을 반환합니다.



버그가 있을 수 있으니, 실무에 사용할 때는 테스트 과정이 필요합니다.




▶▶ [Perl/펄] 소수점 몇 째 자리에서, 엑셀 스타일 반올림 함수 - RoundXL

☞ Perl

2 Comments:
At 11:35 AM, Anonymous 골빈해커 said...

#!/usr/local/bin/perl
use POSIX qw(ceil floor);

$num = 1.52734

print ceil($num);

하시거나

Math::Round 모듈을 이용하셔도 됩지요..^,.^

 
At 11:42 AM, Blogger mwultong said...

아, POSIX 에 있었군요 ^^;

 

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