Try the 'widget' demo included with the Tk module. Lots of good code demos in there. If you mean dialog box, then you might also read 'perldoc Tk::toplevel'. If you mean a message in your existing window, look at 'perldoc Tk::Label'.
edit On second thought, I like
clintp's idea about using Tk::Dialog a lot more than the Tk classes I mentioned.