#!/usr/bin/perl -l

use strict;
use warnings;
use Matrix;

# A somewhat esoteric way to print the
# twelfth Fibonacci number.
print +(matrix(1,1,1,0)**12)->(1,0);

__END__