#@body is the reference to the array of lines
my @body=$item->body;
print @body;
#also tried
foreach my $line (@body){
print $line;
}