$Status{'Total'} = 5;
$s_bar->Label(-textvariable => \$Status{'Total'} )->pack();