Hai,
Just try this piece of code in HTMl part..rather than in perl..which save time and code reduction

in header section put this tag
<meta http-equiv= refresh content= 3600 >
[download]

-Prasanna.K