push (@request, ($sysDescr,$sysUpTime));

##</code><code>##

my @request = ($sysDescr, $sysUpTime);

##</code><code>##

use strict;
use warnings;

##</code><code>##

use diagnostics;

##</code><code>##

use autodie;

##</code><code>##

#!/usr/bin/env perl -l

use strict;
use warnings;

my @array = (1, 2, 3);

my $array_ref_1 = \@array;
my $array_ref_2 = [@array];
my $array_ref_3 = [1, 2, 3];

my $array_ref_ref = [\@array];

use Data::Dumper;

print '*** $array_ref_1  = \@array ***';
print Dumper $array_ref_1;

print '*** $array_ref_2 = [@array] ***';
print Dumper $array_ref_2;

print '*** $array_ref_3 = [1, 2, 3] ***';
print Dumper $array_ref_3;

print '*** $array_ref_ref = [\@array] ***';
print Dumper $array_ref_ref;

my $array_ref_1_new = \@array;
my $array_ref_2_new = [@array];
my $array_ref_3_new = [1, 2, 3]; 

print "\n";
print 'SAME: $array_ref_1 and $array_ref_1_new';
print "SAME: $array_ref_1 and $array_ref_1_new";

print "\n";
print 'DIFF: $array_ref_2 and $array_ref_2_new';
print "DIFF: $array_ref_2 and $array_ref_2_new";

print "\n";
print 'DIFF: $array_ref_3 and $array_ref_3_new';
print "DIFF: $array_ref_3 and $array_ref_3_new";

print "\n";
print 'SAME: $array_ref_1 and $array_ref_1_new and $array_ref_ref->[0]';
print "SAME: $array_ref_1 and $array_ref_1_new and $array_ref_ref->[0]";

##</code><code>##

*** $array_ref_1  = \@array ***
$VAR1 = [
          1,
          2,
          3
        ];

*** $array_ref_2 = [@array] ***
$VAR1 = [
          1,
          2,
          3
        ];

*** $array_ref_3 = [1, 2, 3] ***
$VAR1 = [
          1,
          2,
          3
        ];

*** $array_ref_ref = [\@array] ***
$VAR1 = [
          [
            1,
            2,
            3
          ]
        ];

SAME: $array_ref_1 and $array_ref_1_new
SAME: ARRAY(0x7fa0f202a628) and ARRAY(0x7fa0f202a628)

DIFF: $array_ref_2 and $array_ref_2_new
DIFF: ARRAY(0x7fa0f2029c68) and ARRAY(0x7fa0f210e2a8)

DIFF: $array_ref_3 and $array_ref_3_new
DIFF: ARRAY(0x7fa0f2029d40) and ARRAY(0x7fa0f20ca2f0)

SAME: $array_ref_1 and $array_ref_1_new and $array_ref_ref->[0]
SAME: ARRAY(0x7fa0f202a628) and ARRAY(0x7fa0f202a628) and ARRAY(0x7fa0f202a628)