my @array = (1 ..4); my $size = @array; print "The size of array \@array is $size\n";