package temp_mat13; use Tk; sub skript1{ . . . }