#!/usr/bin/perl

use warnings;
use strict;
use Data::Dumper;

my @arr1 = qw{one two three};
my @arr2 = qw{four five six};
my @mainarr;
push @mainarr, \@arr1, \@arr2;

#print Dumper @mainarr->[1]; # <- line 12

#Using an array as a reference is deprecated at C:\perm\monk.pl line 12.
#C:\perm\monk.pl syntax OK

print Dumper $mainarr[1];

__DATA__
$VAR1 = [
  'four',
  'five',
  'six'
];