I'm betting that the your problem is in:

my @files = ('*.html','*/*.html');

Try using just:

 my @files = ('*.html');

And see if it works then.

LR