Added useful comments, removed redundant stuff & trailing whitespace
set body as an array ref
Added POD