Function move_d ($ SOURCE, $ TARGET) {IF (is_dir ($ source) {$ dest_name = basename ($ source); if (! mkdir ($ target. $ de@name)) {Return False;} $ d = DIR $ source); while ($ entry = $ d-> read ())! == false) {IF (is_dir ($ source. $ entry) {if ($ entry == "." || $ entry = = "..") {Continue;} else {move_d ("$ domGE $ detes /////////////////////////ww (}} else {ix);}} else {if (!" $ TARGET $ DEST_NAME / / $ ENTRY ")) {Return False;}}}} else {i (!" $ SOURCE $ Entry "," $ TARGET $ DEST_NAME / / ")) { Return false;}} return true;
