$dir = $in{sub_dir};

##</code><code>##

rmtree([$dir_location, $dir], 1, 1);

##</code><code>##

rmtree([ "$dir_location/$dir" ], 1, 1);