in reply to drawing 3D rectangle in Perl/Tk

You can get good 3d drawings in the Perl SDL module.Check it out at SDL