practicas en perl