Nicely display a reference to something (hash, array or scalar) in Perl

Below is a little function to display a reference to mainly a hash, array or scalar in Perl:

Code:

use strict;
use warnings;

our $indentationString = "    ";

sub recursive_ref_string
{