Writing COM Components in Perl Part 1