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

#!/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"; # 문자열 변수에 넣어서 출력