#! /usr/bin/perl -w
#FOR: format the pod in ExampleRunner with ExampleRunner 
use strict;
use warnings; 

use lib qw[ lib ];
use Pod::Elemental::Transformer::ExampleRunner;
use Pod::Elemental;

my $pod_document = Pod::Elemental->read_file( 'lib/Pod/Elemental/Transformer/ExampleRunner.pm' );
my @xforms = map Pod::Elemental::Transformer::ExampleRunner->new($_),
    {
    };
$_->transform_node($pod_document) for @xforms;
print $pod_document->as_pod_string();

