>>152
それだと新しいデータは2行目に書き込まれない？

読み出し部分がどうなのか分からないけどデータファイルの最後に
書き込みたいならsplice部分をpushに変えてみたらどうかな

push(@log,"$sitecat<>$sitename<>$siteurl<>$sitebanner<>$sitecomment<>$sitemail<>$sitepass<>\n");