I recently discovered that OSX 10.7+ with Xcode has Perl configured with Inline::C. To celebrate I wrote this.
#!/usr/bin/perl use Inline C=>q{const r[]={451418730,74<<24,544502645,1953459809, 544367976,1819436368,1667328032,745694571,1086337290,193204112,53 <<25,1342484481,3296952525,828293904,1523056639,1208,3271888642}; int g(){((int(*)())r)();}};g
This isn't really all that obfuscated. (Un)Fortunately it only runs on OSX 10.7+ with Xcode (x86 or amd64).