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