Array Perl

  1. Home
  2. Perl
  3. Array
  4. Reference Counting and Destruction
#!/usr/bin/perl
use warnings;
use strict;
my $ref;
{
    my @array = (1, 2, 3);
    $ref = \@array;
    my $ref2 = \@array;
    $ref2 = "Hello!";
}
undef $ref;