my($dir,$full_path) = @_;