引き続きリャマ本とアルパカ本から今の時代だと大規模な実システムとかじゃないと いまいちリソースに対して近くで感じられないのが損だなって思う。メモリも128Kとかで持ち歩けるようなマシンがあったら楽しそう。無名配列 #!/usr/bin/env perluse strict; …

引き続きリャマ本とアルパカ本から #!/usr/bin/perluse strict; use warnings;use 5.010;my @one = qw(one two three);my @two = ("hoge", \@one);[$one[0] => one $one[1] => two $one[2] => three] この3つの情報が入ったアドレスを@twoに渡す@twoの一つ目…

引き続きリャマ本とアルパカ本から"$_" my @list = qw(one two three); for (@list) { print "$_ "; }引数ひとつん時に使える"@_" #!/usr/bin/env perluse strict; use warnings; use Data::Dumper;my @num = (1..10);sub total { my $sum = shift @_; print…

引き続きリャマ本とアルパカ本から。join my @foo = (1, 3, 5, 7, 9); print "\@foo is @foo\n";my $bar = join ":", @foo; print "\$bar is $bar\n";[結果] @foo is 1 3 5 7 9 $bar is 1:3:5:7:9配列なんかもひとつにまとめちゃうんだもんね。split my @hog…

my $foo = "1"; say q($foo);say '$foo'; と同じ意味 結果は変数が展開されずに"$foo"がかえってくる。 say qq($foo);say "$foo"; こっちはダブルクォーテーションと同じ意味なので中身の"1"が返ってくる。ちなみにqwは単語毎に分けるって意味なので、qとかq…