The following code puts references to sub functions into an array and calls them.

use strict;
use warnings;

sub a1 {
  print("a1\n");
}

sub a2 {
  print("a2\n");
}

my @procs = (\&a1, \&a2);

foreach (@procs) {
    $_->();
}
[download]

If I wanted to print @procs array;

foreach (@procs) {
    print("$_\n";
}

I get:

CODE(0x1d4f9ec)
CODE(0x1dc40b4)
[download]

how can i print the references in the @procs array?