sub self($) { $world = shift; return ++$world; }