You'll probably find it helpful to use the following lines at the top of your code:
as you appear to be using a number of undeclared functions and your definition of $file1
is definitely incorrect - backslashes and double quotes don't do what you obviously expect.
A good thing for you to do right now would probably have a read of perlman:perldebug
have a look at the values in your variables. Another tip would be to check the return values of your external calls - are you sure that $Word
is defined before you call methods on it?
Update:I ran the code you supplied and it returns:
Undefined subroutine &main::b called at 422677.pl line 14.
So it looks like you haven't posted the exact code you're trying to run.