$mw->bind('<Control-l>', \&load_file);  # Ctrl-L to load a file