Select Code to Download

#!/usr/bin/env perl

...
    $_->configure(-state => 'disabled') for @$script_buttons;
    $mod->run($script_F, $text_ST, $script_buttons);
}

package Pm_1148798_freeze_tk_mod;

...
}

1;

package Pm_1148798_dummy_tk_mod;

...
}

1;

Running script: Dummy
Dummy line 1
...
Selected day:   06
Selected month: Nov
Selected year:  2018