0036login:Penguin
2014/05/09(金) 22:47:06.86ID:15sC/wsobanner.shをみると99.pngはローテーションの際の退避のファイルに見えるので
99.pngはリストに入れる必要はないと思います。
また、このcgi自体が1時間ごとにファイルをローテーションで読み込むはずなので
banner.shは実行する必要はありません。多分。
#!/usr/bin/perl
use strict;
use warnings;
my @from= (
'/home/murakami/www/2ch-net/00.png', #-- 0,5,10,15,20
'/home/murakami/www/2ch-net/01.png', #-- 1,6,11,16,21
'/home/murakami/www/2ch-net/02.png', #-- 2,7,12,17,22
'/home/murakami/www/2ch-net/03.png', #-- 3,8,13,18,23
'/home/murakami/www/2ch-net/04.png' #-- 4,9,14,19
);
my ($hour) = (localtime(time))[2];
print "Content-type: image/png\n\n";
open IMG,$from[$hour%@from];
print <IMG>;
close IMG;