I have looked at this and ran and tried a few variations. Where I am stuck is just wanting to have one file name (C:\1.htm) that is used and not have to have multiple template files.
if (open(my $infh, '<', $filename)) {
uses the _DATA_ wheras I simply want to open one template file once or repeatedly that has the same file name.