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

 
Previous Post C++, 두 변수의 값 교환 함수 swap(); 참조에 의한 호출(Call by Refer...C언어] 변수 값 서로 교환, 스왑 함수; Swap FunctionC언어] 별표(*) 기호 의미, 뜻; Asterisk Pointer OperatorC언어] printf 함수에서 %p 의미. 변수 번지, 포인터 변수 주소 출력; Print...PHP 예제] 상수 정의 / 선언 방법; Define ConstantPHP 예제] 모든 상수 목록 출력 함수; Dump All Constant Function...PHP 예제] 배열 출력; 구성 요소를 브라우저에 간단히 프린트하기; Print Array...PHP 5] 운영체제에 맞게 개행문자 출력 상수; 자동 CRLF 줄바꿈; DOS Windo...PHP 예제] 배열 출력 함수, 구성 요소 화면에 프린트; Print Echo ArrayPHP 예제] 배열 크기, 사이즈 구하기 함수, 배열 요소 개수; Array Size Fu...

Perl 펄] 두 변수의 값 교환/스왑 함수(서브루틴); Swap Function

Friday, May 04, 2007

펄에서는 간단히 두 변수의 값을 교환할 수 있습니다.

($a, $b) = ($b, $a);

이렇게 리스트(List)를 맞교환하면 됩니다. 그런데 스왑 함수를 만들려면, 아래 예제 속의 함수처럼 해야 교환이 됩니다.

변수 값 서로 바꾸기 예제


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

  my $i = 300;
  my $j = 500;

  print '$i = ', $i, "\n";
  print '$j = ', $j, "\n";
  # $i = 300
  # $j = 500

  swap($i, $j);

  print '$i = ', $i, "\n";
  print '$j = ', $j, "\n";
  # $i = 500
  # $j = 300
  # 두 변수의 값이 서로 변경되었습니다.




# 두 변수 교환 함수
# $_[0] 은 첫번째 파라미터(인수;매개변수)
# $_[1] 은 두번째 파라미터
sub swap {
  ($_[0], $_[1]) = ($_[1], $_[0]);
}



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