I'm having a problem with my Perl script, what I would like the script to achieve is to read a file, search it for certain words, put the results into an Array so I can then call each result with $var[1] etc and print output to a file. I tried doing it without Sub routines but wasn't able to split the results. When I rapped the code into a Sub I