in reply to Unexpected results when removing a HERE-DOC "ending" newline, with map and/or s/// depending on context.
map() normally returns a list. However, if the result is being assigned to a scalar, it returns a count. See perldoc -f map