Can't believe I've had that wrong for so long. Must have misinterpreted it right when I learned perl and have always been careful about it.