Try installing Data::Dumper and view the contents of the variables, both $child and @items. Getting a visual of what your variables actually contain can make great strides in understanding what your program is actually doing vs. what you think it's doing. I've seen that error before when looping through a list of items that contains a blank line at the end.