Select Code to Download

#!/usr/bin/env perl
use strict;
...
print $PAM1->slice('0:9,0:9');

Freq = [0.084746479 0.051042173 0.038350263 0.057409245 0.012554643 0.
+034739087 0.068834076 0.079076299 0.020769539 0.068105505 0.089075666
+ 0.06501172 0.023198108 0.038234114 0.040367031 0.056701793 0.0572191
+84 0.0087322873 0.027854624 0.077978164]

...
 [0.93418835  0.9258903 0.92628621 0.90906687 0.94041803 0.92695645 0.
+91847941 0.90503673 0.92075759 0.98845386]
]