...the script doesn't work.
is not very descriptive: it dies at some of your dies? what error Perl reports?
Reading your code as I understand it you tell Perl something like:
"Perl please for every file in the glob expression if it is a plain file, open it, read it and FOR EVERY occurence of a specified word copy this file to destination with File::Copy AND with the system call". you can use last after the first copy was succesfull.

More notably you are calling the system call inside single quotes ('') and not backticks (``) that you can type with ALT+96 combo.
Pay attention also to the directory separator on windows (you can safely use / instead of \ ): see Glob portabilty issues

HtH
L*

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.