Help for this page

Select Code to Download

Select or download this

use Tk;
use English;
...
sub del_lines {
    $Columns->delete( 0, 'end' );
}