More than 5 years have passed since last update.

配列をprintする時に便利なこと。

Posted at 2014-04-25

perl

my @ary = (1,2,3);
print @ary;
> 123 #と表示される。

それを…。

perl

my @ary = (1,2,3);
$,=','; #こいつをprintする前に!
print @ary;
> 1,2,3 #要素間に指定した,が入って表示される。

CSVとかに便利でしょ。

他に

perl

my @ary = (1,2,3);
print @ary;
print @ary;
> 123123 #と表示される。

それを…。

perl

my @ary = (1,2,3);
$\='\n'; #こいつをprintする前に!
print @ary;
print @ary;
> 123 #配列の終わりに\n(改行)が入って表示される。
> 123