ビンゴ中西のほげほげPerlの関数への引数の受け取り方

スポンサーサイト

--/--/-- (--)--:--:--

上記の広告は１ヶ月以上更新のないブログに表示されています。
新しい記事を書く事で広告が消せます。

スポンサー広告|

Perlの関数への引数の受け取り方

2008/10/01 (水)01:00:53

Perlでは、関数の値の受け渡しに @_ という名前の配列が使われます。
関数内では、この @_ から、値を取得して、使っていく訳ですが、
その取得の方法が、本当に色々あります。ここでは、僕自身が、個人的に好きな取得方法を記載します。

##########　引数が複数 ############
# 好き 
sub f{
  my ($c, $d, $e) = @_;
}

# 好きくない
sub f{
  my $c = shift;
  my $d = shift;
  my $e = shift;
}

# 好きくない
sub f{
  my $c = $_[0];
  my $d = $_[1];
  my $e = $_[2];
}

##########  引数が一つ #############
# 好き
sub f{
  my $c = shift;
}
   
# 好きくない
sub f{
  my $c = $_[0];
}

引数が複数の場合は、左辺の (　　）が、リストをあらわすため、引数が複数であることを暗に示しているため。このやりかたが好きである。タイプ数も少なくてよい。

引数がひとつの場合は、 shift; 　がすごく潔いため！
というよりも、複数の場合には shift を使わない(上記のリストを示す方法）をとっているため、shift; と見た瞬間、引数が一つであると認識しやすくなるため。

ほかにも、 shift; は、 shift @_; の略だとかの説明や、
名前付き引数のやりかただとか書き出すと、きりがないほどです。

スポンサーサイト

未分類| トラックバック：0 コメント：0

≪楽しいお仕事 | ホーム| クロージャの使いどころ≫

コメントを投稿する

トラックバック

この記事のトラックバックURL

この記事にトラックバックする(FC2ブログユーザー)

ブログ検索

プロフィール

ビンゴ中西

Perlが好きである。
プログラミング言語のほとんどは独学。独学の過程で多くのプログラム仲間にも色々教わりました。

日	月	火	水	木	金	土
1	2	3	4	5	6	7
8	9	10	11	12	13	14
15	16	17	18	19	20	21
22	23	24	25	26	27	28
29	30	31	-	-	-	-