$Style{WS_CHILDWINDOW} => $Style{WS_CHILD};
#                           ^ Should be = not =>