This is the simplest way to draw a box, with or without a shadow. Any coloring is completely dependant on the GtkStyle that is passed as the first parameter.

gtk::draw_box($style, $gdkwindow, GTK_STATE_ACTIVE, GTK_SHADOW_IN, $x, $y, $width, $height);