※ ChatGPTを利用し、要約された質問です(原文:Perlについて質問です)
Perlで画像フォルダ内の画像一覧を表示する方法
このQ&Aのポイント
Perlを使用して、画像フォルダ内の画像一覧を表示するプログラムを作成しました。しかし、現在は画像が縦に並んでしまっています。
表示する画像が横並びでいっぱいになったら下に並べるようにしたいです。
画像の横幅が7個までしか表示できない場合、それ以上の画像は下に表示するようにしたいです。
いつもお世話になっております。
画像フォルダの中の画像の一覧するプログラムを作成したのですが、
opendir(DIRHANDLE, "./img/");
foreach(readdir(DIRHANDLE)){
next if /^\.{1,2}$/;
print <<END
<a href="img/$_" rel="lightbox[sample-group]"><img src="img/$_" alt="" width="100"></a>
END
}
closedir(DIRHANDLE);
画像が横並びでいっぱいになれば下に並べるということをやりたいのですが、
どのようにするのでしょうか?
=現在=(■←画像
■
■
■
■
■
==============
と縦に並んでしまいます。
これを
↓==============
■■■■■■■
■■■■■■■
■■■■■■■
■■
===============
23個の画像があり
横が7個(これは横幅のサイズが7個までしかいかなかったとき)
になったら下に7個またさらに下に7個下に端数の2個
となるようにです・・・
お礼
ありがとうございます! テーブル要素で試してみて、 BootStrapというのを調べてみたいと思います。