33   use File::Path qw(make_path remove_tree);
	     [...]
	387  $result = eval { remove_tree "/path/to/tree"; };
	     [...]

##</code><code>##

	cannot remove directory for /path/to/tree Directory not
	empty at /path/to/script line 387.

##</code><code>##

	387  $result = system( "rm -rf /path/to/tree" );