Perl 인쇄는 모든 요소에 대해 선행 공백을 표시합니다.

Question

파일을 배열로로드합니다 (배열 요소의 모든 행). 배열 요소를 처리하고 새 파일에 저장합니다. 나는 새 파일을 인쇄하려면 :

print ("Array: @myArray"); 

-하지만 그것은 모든 라인의 선두 공백으로 보여줍니다. 선행 공백없이 배열을 인쇄하는 간단한 방법이 있습니까?

Answer 1

Matt Fenwick가 올바른지. 배열이 큰 따옴표 안에 있으면 Perl은 요소들 사이에 $" (기본값은 공백으로, the perlvar manpage 참조)의 값을 배치합니다. 당신은 따옴표 외부로 넣을 수 있습니다 : 당신은 예를 들어, 쉼표로 구분 요소를 원하는 경우

print ('Array: ', @myArray); 

이 변경 output field separator :

use English '-no_match_vars'; 
$OUTPUT_FIELD_SEPARATOR = ',';  # or "\n" etc. 
print ('Array: ', @myArray); 

Answer 2

예 - join를 사용

my $delimiter = ''; # empty string 

my $string = join($delimiter, @myArray); 

print "Array: $string";