Hey, try this. The output is updated in place and whatever changed is highlighted as it changes.

use Data::Dumper;
use Term::HiliteDiff 'watch';

for ( ... ) {
    my $before = "text array before is " . Dumper(\@text, $value);
    ...
    watch( $before . "text array after is " . Dumper(\@text, $value) )
+;
}
[download]