Perl drucken zeigt führende Leerzeichen für jedes Element

Question

Ich lade eine Datei in ein Array (jede Zeile in Array-Element). Ich verarbeite die Array-Elemente und speichere sie in einer neuen Datei. Ich mag die neue Datei auszudrucken:

print ("Array: @myArray"); 

Aber - es zeigt sich mit führenden Leerzeichen in jeder Zeile. Gibt es eine einfache Möglichkeit, das Array ohne führende Leerzeichen auszudrucken?

Answer 1

Matt Fenwick korrekt ist. Wenn Ihr Array in doppelte Anführungszeichen gesetzt ist, wird Perl den Wert $" (der standardmäßig ein Leerzeichen ist; siehe the perlvar manpage) zwischen den Elementen angeben. Sie können es nur außerhalb der Anführungszeichen:

print ('Array: ', @myArray); 

Wenn Sie die Elemente beispielsweise durch ein Komma getrennt möchten, die ändern output field separator:

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

Answer 2

Ja - verwenden join:

my $delimiter = ''; # empty string 

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

print "Array: $string";