"Not working" is fairly ambiguous. Nevertheless, this sounds like Why can't I get the output of a command with system()? found in perlfaq8. (Type 'perldoc perlfaq8' from the command line.)

If that shot in the dark completely misses the mark, feel free to respond with what the script actually does (including output and error messages) and what you expect it to do.