$ perl powell1.pl 
title is powell
values are [correct]
object created, back in main
word is powell
powell1.html
powell2.html
files are powell1.html powell2.html
old num is 2
new file is powell3.html
$