I was thinking about this some more after reading "perldoc -q string". It seems like I could create a while loop that walks through the field one character at a time when it reaches the "#" it writes to a new string until it reaches whitespace or the end of the field. However, it also seems like this should be a function of perl or its modules. The perldoc was helpful but didn't directly answer my questions. Perhaps something like a word function?