sub import
{ 
  #pop-up notification of import
  our $notification = $mw->Toplevel();
  $notification->geometry('+400+400');
  $notification->overrideredirect(1);    
  $notification->withdraw;              

  $notification->Label(
      -text       => "   Please wait, I am working...  ",
      -foreground => 'white',
      -background => 'black',
      -height     => 5
  )->pack;

display_notification();

#-------------------------------------
# DOING THE LOADING HERE
#-------------------------------------

hide_notification();
}

sub display_notification {
    $notification->deiconify;
    $notification->raise;
}

sub hide_notification {
    $notification->withdraw;
}