Perlについての質問箱 51箱目
■ このスレッドは過去ログ倉庫に格納されています
0752デフォルトの名無しさん
2012/04/24(火) 12:00:21.55&img_disp("./img/1.gif");
で1.gifが表示されるけど
これのあとのに
&img_disp("./img/2.gif");
&img_disp("./img/3.gif");
としても1.gifしか表示されません、これはどうゆことでしょうか?
1つの画像しか表示できないってことですか?
2つ以上の画像を表示するにはどうしたらいいんですか?
sub img_disp{
local(*IN);
my($img_path)=@_;
open(IN,$img_path);
binmode(IN);
binmode(STDOUT);
print <IN>;
close(IN);
}
■ このスレッドは過去ログ倉庫に格納されています