#!/usr/bin/perl

use strict;
use warnings;

require 'Tk.pm';
Tk->import();

tkinit();
MainLoop;