Just because it's perl it does not mean it cannot hog the CPU - it very much depends on what your script does.

E.g. a simple perl -e 'while(1) {}' can use 100% CPU if nothing else runs on your system.

If you need more help you need to post your script.