Select Code to Download

#!perl -w
use strict;
...
for my $t (@terms) {
    print "$t => " . simplify( $t ), "\n";
};