my $used_space = get_used_space($path);
if ($used_space >= 90) {
    print("Warning: please clean the directory: $path\n");
}