Help for this page
#!/usr/bin/perl -w # the new test3.pl ... sleep 1; $it++ }
$text_box -> insert ("end", $_); $main->update;