#!/usr/bin/perl open(COUNTER,"counter.txt"); $count=; close(COUNTER); $count++; open(COUNTER,">counter.txt"); print COUNTER "$count"; close(COUNTER); open(TEMPLATE,"template.html"); @data=