mwultong Blog ... 프로그래밍 / 계산기

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

 
Saturday, October 21, 2006

펄.Perl] 배열 출력, 배열을 문자열로 변환, Print Array, Array to String


print문으로 배열을 직접 출력하면, 모든 요소들이 하나로 붙어 나와서, 알아보기 힘들게 됩니다.

print $_, "\n" foreach (@num);

이런 foreach문 한 줄로, 배열을 보기 좋게 줄바꿈하여 화면에 출력할 수 있습니다,


또한 join 함수를 사용하여 배열을 1개의 문자열로 변환하여 합칠 수도 있습니다.


배열을 문자열로 출력 또는 변환 예제


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


  my @num = qw( 24 6523.01 9857 51 2 43 90 2 0 0.0 636.62 );

  print "<이러면 배열 요소들이 한덩어리로 출력되어 보기 힘듦>\n";
  print @num;


print "\n\n\n"; # 줄바꿈


  print "\n<foreach 문으로 배열 출력>\n";
  ##########################################
  print $_, "\n" foreach (@num); # 배열 출력


print "\n\n\n"; # 줄바꿈


  my @foo = qw( 맹구 배용준 땡칠이 장동건 강수정 송창식 황당해 고은아 );

  print "\n<이번에는 join 함수를 사용하여>\n";
  ##########################################
  print join " ", @foo, "\n";

  print(join(" ", @foo), "\n"); # 소괄호를 붙여서 이해하기 쉽게

  my $bar = join "/", @foo; # 슬래쉬(/)로 요소 구분
  print $bar, "\n"; # 문자열 변수에 넣어서 출력




실행 결과:
D:\Z>0.pl
<이러면 배열 요소들이 한덩어리로 출력되어 보기 힘듦>
246523.0198575124390200.0636.62



<foreach 문으로 배열 출력>
24
6523.01
9857
51
2
43
90
2
0
0.0
636.62




<이번에는 join 함수를 사용하여>
맹구 배용준 땡칠이 장동건 강수정 송창식 황당해 고은아
맹구 배용준 땡칠이 장동건 강수정 송창식 황당해 고은아
맹구/배용준/땡칠이/장동건/강수정/송창식/황당해/고은아

D:\Z>



▶▶ [Perl] 배열(Array) 덤프; 디버그용

▶▶ Perl/펄] join 함수 사용법 예제; join Function Example




tag: perl
Perl | 펄

0 Comments:

Post a Comment

<< Home RSS 2.0 feed

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