#!/usr/bin/perl
use strict;
use warnings;

$/ = "";
#This is just for example
while (<DATA>){
    print "------------------------------------------\n";
    print "$_";
    print "\n";
}
__DATA__
This is the output

From the tool.