#!/usr/bin/perl -w

# this_code.pl comes with these two modules and more
use Algorithm::Loops 'NestedLoops';
use Algorithm::Diff;

# The rest of the code here.