Perlのサブルーチン
Perlのサブルーチンのメモです。
引数は「@_」に入るので、サブルーチンの中で、引数の受け渡しが必要です。
もちろん省略は可能のようです。
サブルーチンは以下の形がひな形のようです。
sub サブルーチン名 { #処理の記述 }
ちょっとまだよくわかってませんが、そのうちPerl入学式第4回を受講すれば、
ある程度整理されるかと思います。(ちょっとした予習です)
#!/usr/bin/env perl use strict; use warnings; #足し算のサブルーチン sub add { # 引数は「@_」 my @nums = @_; print "@nums\n"; my $sum = 0.0; # 引数の個数分足し合わせる for my $num (@nums){ $sum += $num; } print "合計=$sum\n"; } # サブルーチン呼び出し add(1,2,3,4,5,6,7,8,9,10);
Perlの読みたい本は、以下です。
読んで理解したら、ようやくヒヨッコかなと思います。
- 作者: Randal L. Schwartz,brian d foy,Tom Phoenix,近藤嘉雪
- 出版社/メーカー: オライリージャパン
- 発売日: 2012/07/25
- メディア: 大型本
- 購入: 7人 クリック: 22回
- この商品を含むブログ (16件) を見る
- 作者: ラリーウォール,ジョンオーワント,トムクリスチャンセン,Larry Wall,Jon Orwant,Tom Christiansen,近藤嘉雪
- 出版社/メーカー: オライリー・ジャパン
- 発売日: 2002/09
- メディア: 単行本
- 購入: 8人 クリック: 245回
- この商品を含むブログ (130件) を見る
- 作者: 牧大輔
- 出版社/メーカー: 翔泳社
- 発売日: 2009/02/10
- メディア: 大型本
- 購入: 25人 クリック: 534回
- この商品を含むブログ (113件) を見る