perl - Perl で配列を出力する

Question

UbuntuでPerlを使用しています。配列にいくつかの値を割り当てましたが、配列を印刷すると、いくつかの HASH 値が表示されます。

誰でもこれで私を助けることができますか?

これがコードです。

#!/usr/bin/perl
my $VAR="you are welcome";
my @arr={'1','2','3','4'};
print @arr;
print $VAR."\n";
print "$$ \n";

ここに出力があります

HASH(0x140cd80)you are welcome 
12548

score 9 · Accepted Answer

{ ... }は匿名ハッシュを生成し、そのハッシュ{ 1 => '2', 3 => '4' }をの最初で唯一の要素に割り当てました@arr。

@arr1 から 4 を含む 4 つの要素を設定するには、次のように記述する必要があります。

my @arr = ( 1, 2, 3, 4 );

また

my @arr = 1 .. 4;

そしてprint @arr出力します1234。

配列要素の間にスペースを入れたい場合は、配列を二重引用符で囲みます。print "@arr"出力します1 2 3 4

score 1 · Accepted Answer

Perl で配列を出力するときに書式設定を使用できるその他の方法を次に示します。

print join(", ", @arr);

また

$" = ", ";
print "@arr\n";

2 に答える 2