「利用者:Dsk/memo/perl」の版間の差分

提供: dsk's note
移動: 案内、検索
細
細 (→‎変数に初期値を代入)
6行目: 6行目:
 
===Defined-or演算子 //
 
===Defined-or演算子 //
 
#undefだったら1を代入する。0の場合は0のまま
 
#undefだったら1を代入する。0の場合は0のまま
 +
<syntaxhighlight lang="perl">
 
$a //= 1;
 
$a //= 1;
 
$a = defined $a ? $a : 1;#以前はこう書いていた。
 
$a = defined $a ? $a : 1;#以前はこう書いていた。
 +
</syntaxhighlight>
  
 
===配列 デリファレンス===
 
===配列 デリファレンス===

2015年5月15日 (金) 15:07時点における版

変数に初期値を代入

$a ||= 'test';

===Defined-or演算子 //

  1. undefだったら1を代入する。0の場合は0のまま
$a //= 1;
$a = defined $a ? $a : 1;#以前はこう書いていた。

配列 デリファレンス

for (@{$test->{hoge}}) {
    print $_, "\n";
}
$rec = {
    NAME  => "Jason",
    AGE   => 23,
    PEERS => [ "Norbert", "Rhys", "Phineas"],
};
 
$rec->{NAME}
@{ $rec->{TEST} }

ファイル操作

  • Path::Class
  • File::Slurp - Simple and Efficient Reading/Writing/Modifying of Complete Files

Link

「http://dsktnk.sakura.ne.jp/mw/index.php?title=利用者:Dsk/memo/perl&oldid=1807」から取得