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

my @records = qw/a b c/;
print "Array: " . Dumper @records;
print "Array ref: " . Dumper \@records;