「Perl」配列を作成するサンプル

書式
$ + 配列変数名 +「インデックス値」
配列のインデックスは0からです。0は1番目の要素、
1は2番目の要素。
-1は最後の要素、-2は最後の2番目要素

使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
@sites = qw/google yahoo arkgame/;
print "$sites[0]\n";
print "$sites[1]\n";
print "$sites[2]\n";
print "$sites[-1]\n"; # マイナス-1を指定
@sites = qw/google yahoo arkgame/; print "$sites[0]\n"; print "$sites[1]\n"; print "$sites[2]\n"; print "$sites[-1]\n"; # マイナス-1を指定
@sites = qw/google yahoo arkgame/;
 
print "$sites[0]\n";
print "$sites[1]\n";
print "$sites[2]\n";
print "$sites[-1]\n";    # マイナス-1を指定

実行結果

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
google
yahoo
arkgame
arkgame
google yahoo arkgame arkgame
google
yahoo
arkgame
arkgame

 

Perl

Posted by arkgame