#! usr/bin/perl use strict; use warnings; use Data::Dumper; # ハッシュのハッシュ(ハッシュの中にハッシュがある) my %hash1=( color=>{ 1=>'red', 2=>'bule', 3=>'pink' }, number=>{ a=>111, b=>222, c=>333, d=>444 }, japan=>{ sikoku=>'kouchi', ty…

添字を使うときって、配列の要素にアクセスするときっていうイメージが強すぎて、こんな使い方、思いつかなかった。 #! usr/bin/perl use strict; use warnings; my $hoge1='a'; my $hoge2=123; my $hoge3=0; # 出力結果=>a my $hoge = ($hoge1, $hoge2)[$ho…

perlって、今のところ思ったほど難しくない。でも、これからが問題なんだろうなー。モジュールを使ったり自分でサブルーチン作ったりで。。。 #! usr/bin/perl use strict; use warnings; use Data::Dumper; # 配列の配列(配列の中に配列) my @array1=( [1,2…