perl -MTk -wle'print $Tk::VERSION'