arrays - Perl print はすべての要素の先頭のスペースを示します

Question

ファイルを配列にロードします（配列要素のすべての行）。配列要素を処理し、新しいファイルに保存します。新しいファイルを印刷したい:

print ("Array: @myArray");

ただし、すべての行の先頭にスペースが表示されます。先行スペースなしで配列を印刷する簡単な方法はありますか?

Answer 1

はい -- 次を使用しますjoin。

my $delimiter = '';  # empty string

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

print "Array: $string";

Answer 2

マット・フェンウィックは正しいです。配列が二重引用符で囲まれている場合、Perl は$"(デフォルトではスペースです。perlvar のマンページを参照してください) の値を要素間に挿入します。引用符の外に置くことができます：

print ('Array: ', @myArray);

要素をコンマなどで区切る場合は、出力フィールドの区切り記号を変更します。

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