Eliminarlos no deseados canciones de iTunes del ordenador (7 / 10 paso)

Paso 7: Localizar y borrar las pistas de 1 estrella

Ahora que tenemos nuestra base de datos estableció, es la hora a la caza de las pistas de 1 estrella, por lo que podemos eliminarlas. Perl proporciona un útil construir bucle llamado un bucle foreach que puede utilizarse para iterar sobre todas las claves de nuestro hash.

Cabe señalar que no todas las pistas de tu biblioteca de iTunes tenga una entrada en el hash de calificaciones. Esto es porque las canciones que no tienen una clasificación no dan una línea de clasificación de pista en el archivo XML de iTunes. Por lo tanto, cuando el bucle a través de los algoritmos hash, nos querrá usar la construcción siguiente:

 foreach $id (sort keys %rate_hash) { #...insert looping code here} 

Después de eso, es tan sencillo como usar la siguiente declaración:

 unlink $loc_hash{$id} if $rate_hash{$id} == 20; 

La función Desenlazar (Unlink) utilizada en el código de muestra anterior forma de Perl de eliminación de archivos. Usted puede tener la tentación de utilizar una llamada de sistema a la función de eliminar de su sistema operativo, pero para portabilidad llaman razones el código que he escrito no utiliza el sistema.

Ahora tenemos la estructura básica de nuestro código. En los pasos siguientes, vamos a hacer algunos refinamientos al código para que puedan tener un guión completo y funcional para deshacerse de esos molestos 1-estrellas.