数据库的期末设计弄完了，Perl/Tk 做的前台，前台加数据库花了一天多的时间。代码量倒是不多姑且还没到4 位数，也不知道老师会不会怪自己用perl 做界面，Tk 库毕竟太古老了写出来的窗体有点90 年代的样子。相对于这些数据库的后台设计可愁坏了，下午用没课的第四大节补上几个触发器，呼，终于结束了。

两天上课睡觉下课现学Tk 库和MySQL 语法的同时做期末设计。那时候编写代码边追番，好歹晚上终于可以看看动漫，奈亚子追上了，冰果看了大约有4-5 话，话说真的喜欢上冰果了，其实我觉得说自己在被其中的什么东西吸引着更好一点，如果说这两天有什么收获，就是看冰果的时候很自在，看着渐渐转变的奉太郎觉得有点像看一场平淡的偶遇一样。

本来没准备贴到博客上，不过因为Tk 实在太古老了，几乎没有Tk 的资料，如果对别人有一点参考价值也算是好的吧。

其实今天中午看完冰果感觉挺可惜的，算不上最喜欢的几部动漫，但是确实有一种吸引自己的东西。

找到了一篇很好的教学文章：http://members.inode.at/w.laun/cookbook/cookbook.html

原来的代码已经不需要了。

2013/08/21

另外如果你是Linux 操作系统，那么当你安装Perl 的时候，一般会在你的/usr/bin/site_perl 目录找到一个脚本widget，这是一个Perl/Tk 的教程，非常非常好用，如果你对Perl/Tk 感兴趣，一定要看一看！