correct comment on weakening in old perl