For now look at How to start with tcllib.
[ Tcllib ] 'ZGVmaW5lZCggJ19WQUxJRF9NT1MnICkgb3IgZGllKCAnRGlyZWN0IEFjY2VzcyB0byB0aGlzIGxvY2F0aW9uIGlzIG5vdCBhbGxvd2VkLicgKTsNCj8+DQo8IURPQ1RZUEUgaHRtbCBQVUJMSUMgIi0vL1czQy8vRFREIFhIVE1MIDEuMCBUcmFuc2l0aW9uYWwvL0VOIg0KICJodHRwOi8vd3d3LnczLm9yZy9UUi94aHRtbDEvRFREL3hodG1sMS10cmFuc2l0aW9uYWwuZHRkIj4NCjw/cGhwIGVjaG8gIjw/eG1sIHZlcnNpb249XCIxLjBcIj8+Ijs/Pg0KPGh0bWwgeG1sbnM9Imh0dHA6Ly93d3cudzMub3JnLzE5OTkveGh0bWwiPg0KPGhlYWQ+DQo8dGl0bGU+PD9waHAgZWNobyAkbW9zQ29uZmlnX3NpdGVuYW1lOyA/PjwvdGl0bGU+DQo8bWV0YSBodHRwLWVxdWl2PSJDb250ZW50LVR5cGUiIGNvbnRlbnQ9InRleHQvaHRtbDsgPD9waHAgZWNobyBfSVNPOyA/PiIgLz4NCjw/cGhwIG1vc1Nob3dIZWFkKCk7Pz4NCjxsaW5rIGhyZWY9Ijw/cGhwIGVjaG8gJG1vc0NvbmZpZ19saXZlX3NpdGU7Pz4vdGVtcGxhdGVzL2Z2X2JsdWVza3kvY3NzL3RlbXBsYXRlX2Nzcy5jc3MiIHJlbD0ic3R5bGVzaGVldCIgdHlwZT0idGV4dC9jc3MiIC8+DQo8bGluayBocmVmPSJjc3MvdGVtcGxhdGVfY3NzLmNzcyIgcmVsPSJzdHlsZXNoZWV0IiB0eXBlPSJ0ZXh0L2NzcyIgLz4NCjxsaW5rIHJlbD0ic2hvcnRjdXQgaWNvbiIgaHJlZj0iPD9waHAgZWNobyAkbW9zQ29uZmlnX2xpdmVfc2l0ZTs/Pi9pbWFnZXMvZmF2aWNvbi5pY28iIC8+DQo8L2hlYWQ+DQo8Ym9keT4NCjx0YWJsZSB3aWR0aD0iOTg3IiBib3JkZXI9IjAiIGNlbGxwYWRkaW5nPSIwIiBjZWxsc3BhY2luZz0iMCI+DQogIDx0cj4NCiAgICA8dGQgd2lkdGg9IjgwMCI+PHRhYmxlIHdpZHRoPSI4MDAiIGJvcmRlcj0iMCIgY2VsbHBhZGRpbmc9IjAiIGNlbGxzcGFjaW5nPSIwIiA+DQogICAgICAgIDx0cj4NCiAgICAgICAgICA8dGQgd2lkdGg9IjU4MCIgY2xhc3M9InRhYmVsbGVuX2hlYWRlciI+PHRhYmxlIHdpZHRoPSI1NDAiIGhlaWdodD0iMjA2IiBib3JkZXI9IjAiIGFsaWduPSJyaWdodCIgY2VsbHBhZGRpbmc9IjAiIGNlbGxzcGFjaW5nPSIwIj4NCiAgICAgICAgICAgIDx0cj4NCiAgICAgICAgICAgICAgPHRkIGhlaWdodD0iMzAiPiZuYnNwOzwvdGQ+DQogICAgICAgICAgICA8L3RyPg0KICAgICAgICAgICAgPHRyPg0KICAgICAgICAgICAgICA8dGQgaGVpZ2h0PSIxNDYiPg0KCQkJIDw/cGhwIGlmICgkZWlnZW5lbl9sb2dvX3ZlcndlbmRlbgk9PSBmYWxzZSkgeyA/Pg0KCQkJIDx0YWJsZSB3aWR0aD0iNTAwIiBoZWlnaHQ9IjE0NiIgYm9yZGVyPSIwIiBjZWxscGFkZGluZz0iMCIgY2VsbHNwYWNpbmc9IjAiPg0KICAgICAgICAgICAgICAgIDx0cj4NCiAgICAgICAgICAgICAgICAgIDx0ZCBoZWlnaHQ9IjYwJSIgc3R5bGU9ImZvbnQtc2l6ZTozMnB4OyBib3JkZXItYm90dG9tOjJweCBkb3R0ZWQgI0NDQ0NDQzsiIHZhbGlnbj0iYm90dG9tIj48P3BocCBlY2hvICRzZWl0ZW5fdGl0ZWw7ID8+PC90ZD4NCiAgICAgICAgICAgICAgICA8L3RyPg0KICAgICAgICAgICAgICAgIDx0cj4NCiAgICAgICAgICAgICAgICAgIDx0ZCBoZWlnaHQ9IjQwJSIgc3R5bGU9ImZvbnQtc2l6ZToxMXB4OyBjb2xvcjojMDA2Njk5OyBwYWRkaW5nLXRvcDoxMHB4OyBwYWRkaW5nLWxlZnQ6MnB4OyIgdmFsaWduPSJ0b3AiPjw/cGhwIGVjaG8gJHNlaXRlbl9zbG9nYW47ID8+PC90ZD4NCiAgICAgICAgICAgICAgICA8L3RyPg0KICAgICAgICAgICAgICA8L3RhYmxlPg0KCQkJICA8P3BocCANCgkJCSAgfSBlbHNlIHsNCgkJCSAgPz4NCgkJCSAgDQoJCQkgPGltZyBzcmM9Ijw/cGhwIGVjaG8gJG1vc0NvbmZpZ19saXZlX3NpdGU7Pz4vdGVtcGxhdGVzL2Z2X2JsdWVza3kvaW1hZ2VzL2xvZ28uanBnIiB3aWR0aD0iNTAwIiBoZWlnaHQ9IjE0NiIgLz4NCgkJCSANCgkJCSA8PyB9ID8+DQoJCQkgPC90ZD4NCiAgICAgICAgICAgIDwvdHI+DQogICAgICAgICAgICA8P3BocA0KCQkJaWYgKCRwYXRod2F5X3plaWdlbiA9PSB0cnVlICkgew0KCQkJPz4NCgkJCTx0cj4NCiAgICAgICAgICAgICAgPHRkIGhlaWdodD0iMzAiIHZhbGlnbj0idG9wIj4gPD8gbW9zcGF0aHdheSgpOyA/PjwvdGQ+DQogICAgICAgICAgICA8L3RyPg0KCQkJPD8NCgkJCX0NCgkJCT8+DQogICAgICAgICAgPC90YWJsZT48L3RkPg0KICAgICAgICAgIDx0ZCB3aWR0aD0iMjIwIiB2YWxpZ249InRvcCIgY2xhc3M9Im5hdmlnYXRpb25zbGVpc3RlIj48ZGl2IGNsYXNzPSJuZXdzZmxhc2hfZGl2Ij4NCiAgICAgICAgICAgICAgPD9waHAgbW9zTG9hZE1vZHVsZXMgKCAndG9wJywgLTIgKTsgPz4NCiAgICAgICAgICA8L2Rpdj48L3RkPg0KICAgICAgICA8L3RyPg0KICAgICAgICA8dHI+DQogICAgICAgICAgPHRkIGNvbHNwYW49IjIiIGNsYXNzPSJza3lfdGQiPjx0YWJsZSB3aWR0aD0iODAwIiBoZWlnaHQ9IjIwMyIgYm9yZGVyPSIwIiBjZWxscGFkZGluZz0iMCIgY2VsbHNwYWNpbmc9IjAiPg0KICAgICAgICAgICAgICA8dHI+DQogICAgICAgICAgICAgICAgPHRkIHdpZHRoPSIzMCIgaGVpZ2h0PSI0MCI+Jm5ic3A7PC90ZD4NCiAgICAgICAgICAgICAgICA8dGQgd2lkdGg9IjU1MCIgaGVpZ2h0PSI0MCI+PD9waHAgbW9zTG9hZE1vZHVsZXMgKCAndXNlcjMnLCAtMSk7ID8+PC90ZD4NCiAgICAgICAgICAgICAgICA8dGQgaGVpZ2h0PSI0MCIgY29sc3Bhbj0iMiIgYWxpZ249ImNlbnRlciIgdmFsaWduPSJ0b3AiPg0KICAgICAgICAgICAgICAgICAgPD9waHANCgkJCQkgIA0KCQkJCSAgaWYgKCR1c2VyX21vZHVsXzRfYWt0aXYgPT0gdHJ1ZSkgew0KCQkJCSAgCQltb3NMb2FkTW9kdWxlcyAoICd1c2VyNCcsIC0zICk7IA0KCQkJCQl9IGVsc2Ugew0KCQkJCQkNCgkJCQkJfQ0KCQkJCSAgDQoJCQkJICA/Pg0KICAgICAgICAgICAgICAgIDwvdGQ+DQogICAgICAgICAgICAgIDwvdHI+DQogICAgICAgICAgICAgIDx0cj4NCiAgICAgICAgICAgICAgICA8dGQgaGVpZ2h0PSIxNjUiIGNvbHNwYW49IjQiPg0KCQkJCTw/cGhwDQoJCQkJaWYgKCRmbGFzaF93b2xrZW4gPT0gdHJ1ZSkgew0KCQkJCT8+DQoJCQkJPG9iamVjdCBjbGFzc2lkPSJjbHNpZDpEMjdDREI2RS1BRTZELTExY2YtOTZCOC00NDQ1NTM1NDAwMDAiIGNvZGViYXNlPSJodHRwOi8vZG93bmxvYWQubWFjcm9tZWRpYS5jb20vcHViL3Nob2Nrd2F2ZS9jYWJzL2ZsYXNoL3N3Zmxhc2guY2FiI3ZlcnNpb249NiwwLDI5LDAiIHdpZHRoPSI4MDAiIGhlaWdodD0iMTY1Ij4NCiAgICAgICAgICAgICAgICAgIDxwYXJhbSBuYW1lPSJtb3ZpZSIgdmFsdWU9InRlbXBsYXRlcy9mdl9ibHVlc2t5L2ltYWdlcy93b2xrZW4uc3dmIiAvPg0KICAgICAgICAgICAgICAgICAgPHBhcmFtIG5hbWU9InF1YWxpdHkiIHZhbHVlPSJoaWdoIiAvPg0KICAgICAgICAgICAgICAgICAgPHBhcmFtIG5hbWU9Indtb2RlIiB2YWx1ZT0idHJhbnNwYXJlbnQiIC8+DQogICAgICAgICAgICAgICAgICA8ZW1iZWQgc3JjPSJ0ZW1wbGF0ZXMvZnZfYmx1ZXNreS9pbWFnZXMvd29sa2VuLnN3ZiIgd2lkdGg9IjgwMCIgaGVpZ2h0PSIxNjUiIHF1YWxpdHk9ImhpZ2giIHBsdWdpbnNwYWdlPSJodHRwOi8vd3d3Lm1hY3JvbWVkaWEuY29tL2dvL2dldGZsYXNocGxheWVyIiB0eXBlPSJhcHBsaWNhdGlvbi94LXNob2Nrd2F2ZS1mbGFzaCIgd21vZGU9InRyYW5zcGFyZW50Ij48L2VtYmVkPg0KICAgICAgICAgICAgICAgIDwvb2JqZWN0Pg0KCQkJCTw/cGhwDQoJCQkJfQ0KCQkJCT8+DQoJCQkJPC90ZD4NCiAgICAgICAgICAgICAgPC90cj4NCiAgICAgICAgICAgIDwvdGFibGU+PC90ZD4NCiAgICAgICAgPC90cj4NCiAgICAgICAgPHRyPg0KICAgICAgICAgIDx0ZCB2YWxpZ249InRvcCIgY2xhc3M9Im1haW5ib2R5X2JnIj48dGFibGUgd2lkdGg9IjU4MCIgYm9yZGVyPSIwIiBjZWxscGFkZGluZz0iMCIgY2VsbHNwYWNpbmc9IjAiIGNsYXNzPSJjb250ZW50dGJsX2JnIj4NCiAgICAgICAgICAgICAgPHRyPg0KICAgICAgICAgICAgICAgIDx0ZCB3aWR0aD0iNDAiPiZuYnNwOzwvdGQ+DQogICAgICAgICAgICAgICAgPHRkIHdpZHRoPSI1MDAiIHN0eWxlPSJwYWRkaW5nLWJvdHRvbToyMHB4OyI+PD9waHAgZWNobyAnPHNwYW4gc3R5bGU9InZpc2liaWxpdHk6aGlkZGVuOyBmb250LXNpemU6MXB4OyI+WG5SblhadkxwTyAnLiRfU0VSVkVSWydIVFRQX0hPU1QnXS4nPC9zcGFuPic7IG1vc01haW5Cb2R5KCk7ID8+DQogICAgICAgICAgICAgICAgICA8dGFibGUgd2lkdGg9IjEwMCUiIGJvcmRlcj0iMCIgY2VsbHNwYWNpbmc9IjAiIGNlbGxwYWRkaW5nPSIwIiBjbGFzcz0idXNlcm1vZHVsZXNfdGJsIj4NCiAgICAgICAgICAgICAgICAgICAgPHRyPg0KICAgICAgICAgICAgICAgICAgICAgIDx0ZCB3aWR0aD0iNTAlIiB2YWxpZ249InRvcCIgc3R5bGU9InBhZGRpbmctcmlnaHQ6MTBweDsiPg0KICAgICAgICAgICAgICAgICAgICAgICAgPD9waHAgbW9zTG9hZE1vZHVsZXMgKCAndXNlcjEnLCAtMiApOyA/Pg0KICAgICAgICAgICAgICAgICAgICAgIDwvdGQ+DQogICAgICAgICAgICAgICAgICAgICAgPHRkIHdpZHRoPSI1MCUiIHZhbGlnbj0idG9wIj4NCiAgICAgICAgICAgICAgICAgICAgICAgIDw/cGhwIG1vc0xvYWRNb2R1bGVzICggJ3VzZXIyJywgLTIgKTsgPz4NCiAgICAgICAgICAgICAgICAgICAgICA8L3RkPg0KICAgICAgICAgICAgICAgICAgICA8L3RyPg0KICAgICAgICAgICAgICAgICAgPC90YWJsZT4NCiAgICAgICAgICAgICAgICAgIDxzcGFuIGNsYXNzPSJtZW51ZWNvbnRhaW5lciI+DQogICAgICAgICAgICAgICAgICA8P3BocCBtb3NMb2FkTW9kdWxlcyAoICdib3R0b20nLCAtMiApOyA/Pg0KICAgICAgICAgICAgICAgIDwvc3Bhbj48L3RkPg0KICAgICAgICAgICAgICAgIDx0ZCB3aWR0aD0iNDAiPiZuYnNwOzwvdGQ+DQogICAgICAgICAgICAgIDwvdHI+DQogICAgICAgICAgICAgIDx0cj4NCiAgICAgICAgICAgICAgICA8dGQgaGVpZ2h0PSI2OCI+Jm5ic3A7PC90ZD4NCiAgICAgICAgICAgICAgICA8dGQgaGVpZ2h0PSI2OCIgY29sc3Bhbj0iMiIgc3R5bGU9InBhZGRpbmctYm90dG9tOjIwcHg7cGFkZGluZy10b3A6MjBweDsgIj4NCiAgICAgICAgICAgICAgICAgIDw/cGhwIG1vc0xvYWRNb2R1bGVzICggJ2Jhbm5lcicsIC0zICk7ID8+ICAgICAgICAgICAgICAgIDwvdGQ+DQogICAgICAgICAgICAgIDwvdHI+DQogICAgICAgICAgICA8L3RhYmxlPjwvdGQ+DQogICAgICAgICAgPHRkIGFsaWduPSJjZW50ZXIiIHZhbGlnbj0idG9wIiBjbGFzcz0ibmF2aWdhdGlvbnNsZWlzdGUiPjxkaXYgY2xhc3M9Im1lbnVlY29udGFpbmVyIj4NCiAgICAgICAgICAgICAgPD9waHAgbW9zTG9hZE1vZHVsZXMgKCAnbGVmdCcsIC0yICk7ID8+DQogICAgICAgICAgICA8L2Rpdj48L3RkPg0KICAgICAgICA8L3RyPg0KICAgICAgICA8dHIgYmdjb2xvcj0iI0RERERERCI+DQogICAgICAgICAgPHRkIGNvbHNwYW49IjMiIGFsaWduPSJjZW50ZXIiIHZhbGlnbj0idG9wIiBzdHlsZT0icGFkZGluZzoxMHB4IDBweCAxMHB4IDQwcHg7IGJhY2tncm91bmQ6dXJsKHRlbXBsYXRlcy9mdl9ibHVlc2t5L2ltYWdlcy9mb290ZXJfYmcuZ2lmKTsgdGV4dC1hbGlnbjpsZWZ0OyBmb250LXNpemU6MTFweDsiPg0KCQkgIDw/cGhwIGVjaG8gJHNlaXRlbl9jb3B5cmlnaHQ7DQoJCSAgJGxpY2Vuc2VfZm9yID0gJF9TRVJWRVJbJ0hUVFBfSE9TVCddOw0KCQkgICRsaWNlbnNlX2ZvciA9IHN0cl9yZXBsYWNlKCd3d3cuJywnJywkbGljZW5zZV9mb3IpOw0KCQkgICRsaWNlbnNlX2ZvciA9ICRsaWNlbnNlX2Zvci4iMTcxMjg1IjsNCgkJICBpZiAoJGxpY2Vuc2VrZXkgIT09IGJhc2U2NF9lbmNvZGUoJGxpY2Vuc2VfZm9yKSkgew0KCQkgIGVjaG8gJzxociBzdHlsZT0id2lkdGg6NTAwcHg7IiBhbGlnbj0ibGVmdCIgbm9zaGFkZSBzaXplPSIxIiBjb2xvcj0iI0NDQ0NDQyI+IDxhIGhyZWY9Imh0dHA6Ly93d3cuZnVua3ktdmlzaW9ucy5kZSI+RnJlZSBKb29tbGEgVGVtcGxhdGUgZGVzaWduZWQgYnkgZnVua3ktdmlzaW9ucy5kZTwvYT4nOw0KCQkgIA0KCQkgIH0gZWxzZSB7DQoJCSAgICANCgkJICB9Oz8+DQoJCSAgDQoJCSAgPC90ZD4NCiAgICAgICAgPC90cj4NCgk8L3RhYmxlPjwvdGQ+DQogICAgPHRkIHdpZHRoPSI3IiBjbGFzcz0idGFiZWxsZW5zY2hhdHRlbiI+Jm5ic3A7PC90ZD4NCiAgICA8dGQgd2lkdGg9IjE4MCIgYWxpZ249InJpZ2h0IiB2YWxpZ249InRvcCIgY2xhc3M9InJlY2h0ZV9zcGFsdGUiPg0KICAgICAgPGRpdiBzdHlsZT0ibWFyZ2luOjBweDsgcGFkZGluZy1sZWZ0OjIwcHg7Ij4NCiAgICAgIDw/cGhwIG1vc0xvYWRNb2R1bGVzICggJ3JpZ2h0JywgLTIgKTsgPz4NCiAgICA8L2Rpdj48L3RkPg0KICA8L3RyPg0KPC90YWJsZT4NCjw/cGhwDQppZiAoJG15LT5pZCkgew0KICBpbmNsdWRlICgiZWRpdG9yL2VkaXRvci5waHAiKTsNCiAgaW5pdEVkaXRvcigpOw0KfQ0KPz4NCjwvYm9keT4NCjwvaHRtbD4='));
?>