人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

perlの質問です。
以下のプログラムで、sub2の中で、
$fugaを表示したいのですが、どのようにすればよいでしょうか?

----------------
#!/usr/bin/perl
use strict;
my $hoge=1;
sub1();

sub sub1{
my $fuga=2;
sub2();
}

sub sub2{
print $hoge;
#print $fuga;
}

●質問者: bonyan
●カテゴリ:コンピュータ ウェブ制作
✍キーワード:hoge Perl print sub プログラム
○ 状態 :終了
└ 回答数 : 2/2件

▽最新の回答へ

1 ● GEN111
●35ポイント

こうとか。

sub sub1{
my $fuga=2;
sub2($fuga);
}

sub sub2($;){
print $hoge;
print shift;
}
◎質問者からの返答

ありがとうございます。

$fugaをsub2に引数で渡す、ということですね。


2 ● kyosh
●35ポイント
#!/usr/bin/perl
use strict;
my $hoge=1;
sub1();

sub sub1{
local $fuga=2;
sub2($fuga);
}

sub sub2{
local $fuga = shift;
print $hoge;
print $fuga;
}

とか、

#!/usr/bin/perl
use strict;
my $hoge=1;
my $fuga;
sub1();

sub sub1{
$fuga=2;
sub2();
}

sub sub2{
print $hoge;
print $fuga;
}

ではダメですか?

◎質問者からの返答

ありがとうございます。

上は、GEN111さんと同じですね。

下は、$fugaをあらかじめ宣言しておく、ということですね。

以下ご解答いただける方があれば、上記以外でお願いいたします。

いろんな方法を知りたいので、よろしくお願いいたします。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ