勉強を始めて数日、サブルーチンが理解できずこまっています。長くてすみませんが、どなたか以下の解説をお願いします。

1 : $aa = "hello";
2 : $kekka_sub_1 = $sub_1($aa);
3 : $kekka_sub_2 = $sub_2($aa);
4 :
5 : print "sub_1の結果: $kekka_sub_1";
6 : print "sub_2の結果: $kekka_sub_2";
7 :
8 : sub sub_1{
9 : ($aa) = @_;
10: $aa = "Hanako!".$aa;
11: return $aa;
12: }
13:
14: sub sub_2{
15: ($aa) = @_;
16: $aa = "Taro!".$aa;
17: return $aa;
18: }

まず、line9と15の@_というのが一体何なのかわかりません。
@といえば配列全体を示すものと覚えているのですが、これがどこから来たのか・・・・。
次にreturnですが、これは実際には「line1の$aaへ戻れ」という意味なのかそれとも別の意味なのか・・・・・。

私の持っている本だと@_は、サブルーチンの引数が設定されている変数です。とあるのですが、実際何をしているところなのかが理解できません。
勉強を始めたばかりなので、わかりやす~い解説を頂けたらうれしいです。よろしくお願いします。

このQ&Aに関連する最新のQ&A

A 回答 (1件)

まず、書かれているスクリプトに一部書き間違いと思われるところがありますので、そちらを修正しますね。


2 : $kekka_sub_1 = $sub_1($aa);
3 : $kekka_sub_2 = $sub_2($aa);

$kekka_sub_1 = &sub_1($aa);
$kekka_sub_2 = &sug_2($aa);
ですね。

引数というのは、関数へジャンプするときに
一緒に持っていく変数や値の事です。
たとえば、このスクリプトですと2行目、3行目の$aaの部分が引数に当たります。
Perlでは関数を呼び出すときに自動的に引数が@_という配列になります。
なので、引数は関数側ではその配列の添え字を利用して、
@_[0]  # 一つ目の引数
@_[1]  # 二つ目の引数
という感じで値を受け取るんです。
このスクリプトでは、値を受け取るときに
($aa) = @_;
となっていますが、これは
$aa = @_[0];
と同じ意味になります。
split関数の記述を思い出してくださればご理解いただけると思います。
でも後者の方がわかりやすいと思いますよ。

もっと言えば、このままだとこの$aaと関数を呼び出す時に使用した$aaは同じ物とみなされてしまうので、関数の中で$aaの中身を変えてしまったら、関数の外の$aaの中身も変わってしまいます。
それを防ぐ為には
local($aa) = @_[0];
として、「これはこの関数の中だけで使う変数なんだ」と書いてやる必要があります。

returnですが、これは「戻り値」と言いまして、関数から抜けるときに一緒に持って変える値の事です。(この場合$aa)
その値はこの例ですと$kekka_sub_2 = &sub_2($aa);
の$kekka_sub_2 に格納される事になります。

sub1では受け取った値("hello")を"Hanako!"と連結させて返しているんです。
実際にこのスクリプトを動かしてみると、よくわかると思いますよ。

長々と失礼しました。
    • good
    • 0
この回答へのお礼

yuizuianさん、とってもとっても分かりやすい解説ありがとうございます。
ものすごく分かりやすいので、ひとつひとつ何度も読んでます。
こんな参考書があったらいいんですけど、探すのが下手なのか、それとも私が理解できなさ過ぎなのか・・・・。
とにかく、ありがとうございます。本当に助かりました。

お礼日時:2001/10/14 12:42

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aと関連する良く見られている質問

Q$abc == 0;

フリ-CGIを使ってCGIの勉強中です、
今使っているフリ-CGI掲示板の中に下記のコ-ドがあります、
$abc == 0;

$abc = 0; の間違いだと思うのですが別の意味があるのですか。

Aベストアンサー

こんにちは。

cgiの勉強中ということですが。
質問される前に本などごらんになりましたか??
どういったことから間違いだと思うのでしょうか??

$abc == 0;
は間違いではありません。
==と=の違いをご存知ですか??

$abc == 0;
は「$abcが0である」
$abc = 0;
は「$abcに0を代入する」
ということです。

参考URL:http://tohoho.wakusei.ne.jp/www.htm

Q変数名を $_ にしたくない

&xxx("AA","BB");
sub xxx{print @_}

↑のソースで sub に @_ という名前の配列に
引数を渡すことができたけど、@z という名前の配列に
引数を渡したい場合はどういうソースになるんですか?

{print @_} は {print @_;} のようにセミコロンを
書いてあるのが普通だと思うけど、このような場合は
セミコロンを省略して問題があったりしますか?


下の foreach についても $_ というのを $z にするには
どういうソースにしたらいいか教えてください。

$xx{"A"}= "aaa";
$xx{"B"}= "bbb";
$xx{"C"}= "ccc";
foreach(keys %xx){print "添え字は$_で値は$xx{$_}<br>"}

Aベストアンサー

こんにちは。

> @z という名前の配列に
> 引数を渡したい場合はどういうソースになるんですか?

単に sub xxx の中で my (@z) を宣言し、それに @_ をコピーするのではダメですか?
つまり、次のようになります。
  sub xxx
  {
    my (@z) = @_;
    print @z;
  }

> セミコロンを省略して問題があったりしますか?

セミコロンが無くても動くし perl -cw でも文句は言われませんが、習慣として付けておくことを強くお勧めします。
たった1文字のタイプを節約することが余程重要な特殊事情でもなければ…
perl では、「文はセミコロンで終わる」のが基本文法だからであり、動くからといって変な省略をすると、あとでもっとコードが複雑になった時に必ず混乱を来します。

foreach の件は、単に foreach $z (keys %xx) { } として、{ } の中の $_ を $z にすれば動きます。

Q$ENV{'REMOTE_HOST'}について

CGIにて$ENV{'REMOTE_HOST'}を取得したところ
スパム投稿なのですが、$ENV{'REMOTE_HOST'}が
IPアドレスの値である142.54.182.186が入っていました。
普通はkd182249232116.au-net.ne.jp
などという形になると思うのですが
142.54.182.186
となっていることが通常ありえるのでしょうか?
リモートホストを取得し、IPアドレスの形式であった場合、
この投稿者を弾いてしまっても問題ありませんか?

Aベストアンサー

IPアドレスが入っているか、ホスト名が得られるかは、Apacheの設定によります。
ホスト名を得る設定になっていてもDNSの逆引きがその時たまたま失敗すると、IPアドレスのまま設定されます。
なので、「ホスト名が入っていたら儲けもの」くらいの感覚で扱うのがよいかと。

Q$_という変数は何を意味するのでしょう?

Perlの勉強中ですが、
$_
という変数がperlの予約語だということだけは知りました。
ですが、この$_はどういった場面で使用されるものなのでしょうか?
例文を教えていただけますと助かります。

Aベストアンサー

No1.さんが例を出しておりますが、
何かの処理をする時に変数を省略した場合に$_を使う事が出来ます。
forとかwhileで使う事が多いですかね?

foreach ( 1 .. 10 ) {
print "$_\n";
}

としたら、1から10まで数字が改行されて出力されます。
明示的に変数を指定すると以下のようになります。

foreach $i ( 1 .. 10 ) {
print "$i\n";
}

参考になりましたら幸いです。

Q引数処理に$ENV{'PATH_INFO'}を用いた際のクッキーについて

自作cgiの引数を $ENV{'PATH_INFO'}を用いた形式
(hoge.cgi/aaa/bbb/cccという形式)に変更しました。

ところが、組み込んでいるアクセス解析用のクッキーが
本来ならば hoge.cgiに対してクッキー1個となるはずですが、

hoge.cgi で1個目
hoge.cgi/aaa で2個目
hoge.cgi/aaa/bbb で3個目
hoge.cgi/ccc で4個目
 ・・
と、引数が変わるたびに発行されてしまいます。
ブラウザで確認すると同じ内容のクッキーが
アクセスした際の引数の分だけズラズラと羅列されています。

本来あるべき形である hoge.cgiに対してクッキー1個にするには
どのようにしたら良いのでしょうか。

Aベストアンサー

Cookie出力の際にパスを設定すれば大丈夫です。指定方法は参考URLを見てください。
とりあえず path=/ をつければ大丈夫ですが、詳細に指定することもできます。
例えば hoge.cgi のURLが
  http://www.example.com/foo/hoge.cgi
だとしたら、path=/foo とすることで
  http://www.example.com/bar/hoge.cgi
などにはCookieが送信されなくなります。
また、www がなくてもアクセスできるページである場合には、domain=.example.com も追加することで
  http://www.example.com/foo/hoge.cgi
にも
  http://example.com/foo/hoge.cgi
にもCookieが送信されるようになります。
(これをしないと、www付きで発行したCookieが、wwwなしの方に送信されません。)

参考URL:http://www.tohoho-web.com/wwwcook.htm#CookieWrite

Cookie出力の際にパスを設定すれば大丈夫です。指定方法は参考URLを見てください。
とりあえず path=/ をつければ大丈夫ですが、詳細に指定することもできます。
例えば hoge.cgi のURLが
  http://www.example.com/foo/hoge.cgi
だとしたら、path=/foo とすることで
  http://www.example.com/bar/hoge.cgi
などにはCookieが送信されなくなります。
また、www がなくてもアクセスできるページである場合には、domain=.example.com も追加することで
  http://www.example.com/foo/hoge.cgi
にも
...続きを読む


このカテゴリの人気Q&Aランキング

おすすめ情報