1. two steps
Find:
,

Replace:
(nothing)
Find:
\s{3,}

Replace:
, 
Find:
(\w+),\s(\w+).*\s(\w+@\w+.\w+)

Replace:
\2 \1 \(\3\)
Find:
,\s.*,

Replace:
,
Find:
,\s(\w)\w+\s(\w+)

Repalce:
, \1_\2
Find:
,\s(\w)\w+\s(\w{3})\w+

Replace: 
, \1_\2.