Data Type Perl

  1. Home
  2. Perl
  3. Data Type
  4. Reference Modification
#!/usr/bin/perl
use warnings;
use strict;
my @band = qw(A B C D);
my $ref = \@band;
print "Band members before: @band\n";
pop @{$ref};
print "Band members after: @band\n";