use PDL;
$piddle = pdl @your_array;
$a = slice $piddle, '$column,:';
print stats $a;