#!/usr/bin/env perl
use utf8;
###############################################################################
# This program prints a multiplication table for 12s.
# 
# Copyright © 2020 Richard Lesh.  All rights reserved.
###############################################################################

use strict;
use warnings;

MAIN:
{
    binmode(STDOUT, ":utf8");
    binmode(STDERR, ":utf8");
    binmode(STDIN, ":utf8");
    print "0 \x{D7} 12 = 0\n";
    print "1 \x{D7} 12 = 12\n";
    print "2 \x{D7} 12 = 24\n";
    print "3 \x{D7} 12 = 36\n";
    print "4 \x{D7} 12 = 48\n";
    print "5 \x{D7} 12 = 60\n";
    print "6 \x{D7} 12 = 72\n";
    print "7 \x{D7} 12 = 84\n";
    print "8 \x{D7} 12 = 96\n";
    print "9 \x{D7} 12 = 108\n";
    print "10 \x{D7} 12 = 120\n";
    print "11 \x{D7} 12 = 132\n";
    print "12 \x{D7} 12 = 144\n";
}