Help for this page
$dir = $in{sub_dir};
rmtree([$dir_location, $dir], 1, 1);
rmtree([ "$dir_location/$dir" ], 1, 1);