"Any ideas"? There are plenty of ways to do it, depending on how sophisticated your abilities both in Shake and elsewhere, and how much time and budget you might have to work with.
Here's a really quick example... Paste the below script into Shake. It will need to be tracked onto the skin. You can adjust the color of the glow by fiddling with the controls in the Mult. You can layer this OVER or IADD it to the other footage to see the effect. It'll be nowhere near a complete effect, but it might get you started.
It's totally going to be dependent on your footage and the exact effect you're trying to achieve, though.
(You might want to paste the script into a text editor and straighten out the line breaks... The forum will probably break it. Especially watch for any instances of that "Ampersand quot;" or "Ampersand #34;" nonsense that will totally break it in Shake. Change that to a standard double quote if it appears.)
CODE
QuickPaint1 = QuickPaint(0, 0, "v1.11", 1, 1, 1, 1, 1, 20, 9, 1,
1, 100, 0, JSplineV(x,1,0@0,1@1), 0.2, 1, "100W@8E000JtbsuHXHqABV7lnSaG9rGZaoQXfSnopSEdff6KaMZ018Y5sK3alG8xhLOjEMPUk95XGsa2JIpaAEICYi9NY6SLpFfm2pVZtSzuJRsxcoovz6t84cUaAFII3x3ln#sh#mCZxf@SW#v2u9gW4jOOrtuZd5KeD04jXpfhlWz8#mwMHINF3wel7sZrFr4r9AedBYeEjqrOp6id3enAzjFRat6#gnZy9jiJZrsfc0qspbKlDbJXNOvYArbANxUD1NfvoJilMdGVSf2zrM4yh3Qkf3zcRirUv4vDamxjWU17ytOlLagg3qhLOKtStVwBS7vzZGj68zbhGV92y#W8g7h86VMrqLemVm#Cb4YUEqN6qbVHSGxhLCvn#IsybgS5qGVUil#k8AtBTGVc5HzEeAI3O@wDdmxHeJAeVP8HvPex5v7Q@kl1z9jWBwxIEq@3cYyvq@5s@1ctIYZxzT#RZTg7WVpK0Gwji000000000019",
"100W@mD000JtbsuHXDuAhh5@nSt8vxFHrWSBWqbDaiKI9fBhAcKIa7kIECIKKEkcvpymUipsuGUE@HXh@xdsyzns@k@@rfRxuPhVxNi5@vRWnZfhQtGh4lzBw32R5pZP9nOudV7PZcTMs7mWRjwp9xxyP5YJdTKSFMvZyxLz3KfVFbEAE@8UBTKUNXP#D3buxROV3iBcSbQN1zRplIgtI3sd1HsXNnMzNLelDYGxEfVpal6#5LU9ZeRXRn8s@u72YDTbcF5zpSzneLeVJRaV6SBsKAG@aACUCo5Ql6nJfzFgbc@WYEJSAX#BJyw7KvX2V0T3TdnuJegpJwxOuMi3HGxaLfCk4gVj1njhzwQ3uNjgiO8WGJBtYDRjfVwZ5tYLTcODRbqUItqHp@@azNrxYzxQ0#00m9wl2");
Blur1 = Blur(QuickPaint1, 40, xPixels/GetDefaultAspect(), 0,
"gauss", xFilter, "rgba");
DilateErode1 = DilateErode(QuickPaint1, "rgba", -1.22222221,
xPixels/GetDefaultAspect(), 0, 0, 0);
Mult1 = Mult(Blur1, 0.25, 0.25, 2, 1, 1);
IAdd1 = IAdd(Mult1, DilateErode1, 1, 100);