$hlist->bind('<Button-1>', \&read_entry);