in reply to a lil help on file extension

...and you probably want to stick a /i modifier, in case the extension is in uppercase, or mixed case:
unless ( $file_names =~ m/\.html?$/i ) { ... }

hope this helps,