#!/usr/bin/perl
use strict;
use warnings;
use Data::Dumper;

my @data1 = (
    {
	'NAME' => 'JOE DOE',
	'DATE' => '2015-05-05',
	'NUMBER' => '00001'
    }
    );

print Dumper \@data1;

my $arrayrefData1  = \@data1;

print Dumper $arrayrefData1;

__DATA__
$VAR1 = [
          {
            'NAME' => 'JOE DOE',
            'NUMBER' => '00001',
            'DATE' => '2015-05-05'
          }
        ];
$VAR1 = [
          {
            'NAME' => 'JOE DOE',
            'NUMBER' => '00001',
            'DATE' => '2015-05-05'
          }
        ];