Select Code to Download

#!/usr/bin/env perl 
use strict;
...
my @records = qw/a b c/;
print "Array: " . Dumper @records;
print "Array ref: " . Dumper \@records;