Don't use Perl prototype subs - they don't do what you think they do and they probably do things you don't expect.

Calls to new should be of the form Package->new (...). You need to fix the calls to new for both ShimPractise and XML::Parser (which you wrote as XMLParser in the code btw).

With those bugs fixed and print $shimString; appended your code generates:

Number of Tags: 3<BR>
Tags:  Tag1 Tag2 Tag3<BR>
[download]