ブログ、10月から更新が止まってる…。 11月、12月忙しかったからなぁ…。 今回のテーマは「配列」 (だったみたい。12月にatnd登録したっきりで、忘れていた…。 で、LTの人数が足りないということで、飛び入り参加。 何にしようかと思案して、配列を引数として使うところに絞って説明してみた。 #!/usr/bin/perl use strict; use warnings; #1つ渡す my @name = ("shinji"); &say_name(@name); #まぁ普通 sub say_name { my ($name) = @_; print "he is ".$name."\n"; } #2つ渡す my @names = ("shinji","aska") &say_names(@names); #なんか似た行が並んだ。 sub say_names { my ($name1,