there seems to be some strange error which is present in both the assoc 0.3 and the 0.4 which i'm working on

when invoked with extensions as an argument it says that the variable $extcnt is undefined, and says:

Use of uninitialized value in substr at E:\Workspaces\Perl\asocx 0.3.p
+l line 146
[download]

when all that happens there is '$extcnt++' in the scope of the while loop...

needless to say worse things happen when I try to run the 0.4 version, I don't understand how .htm can equal a SH File when SH file can't be found anywhere near .htm in the registry.

Update
solved the problem with the undefined variables, by adding = 0 but I still get the strange substr error