Make the heavily nested Perl docs more readable (though invalid POD)

pod-refuck.pl

#!/usr/bin/env perl

use warnings;
use strict;
use 5.010;

use constant INDENT_WIDTH => 2;

my $indent_level = 0;

sub indentation {
    return " " x ($indent_level * INDENT_WIDTH);
}

sub reprint {
    print indentation, shift // $_;
}

while (<>) {
    if (/=over\b/) {
        reprint;
        reprint "{\n";
        ++$indent_level;
    } elsif (/=back\b/) {
        --$indent_level;
        reprint "}\n";
        reprint;
    } else {
        if (/\S/) {
            reprint;
        } else {
            print;
        }
    }
}