MacOS X perl privilege escalation

Instruction "$ = numericid;" for setting uid doesn't work...