Data Type Perl

#!/usr/bin/perl
use strict;
my @array = qw( hello world );
print( 'ref(\@array) = ', ref( \@array ), "\n" );