• Publicidad

Borrar etiquetas de una imagen

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Borrar etiquetas de una imagen

Notapor BigBear » 2014-10-31 16:33 @731

Tengo el siguiente código:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. use Image::ExifTool;
  2.  
  3. my $imagen_target = "test.jpg";
  4. my $datos_imagen = new Image::ExifTool;
  5. my $informacion_imagen = $datos_imagen->ImageInfo($imagen_target);
  6.  
  7. $datos_imagen->SetNewValue("Keywords","Model", DelValue => 1);
  8.  
  9. $success = $datos_imagen->WriteInfo($imagen_target);
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4


Estoy tratando de borrar la etiqueta Model pero el código no lo hace. ¿Qué estoy haciendo mal?

P.D.: quiero borrarlo entero, no solo el valor.
Última edición por explorer el 2014-10-31 17:04 @753, editado 1 vez en total
Razón: codigo => código; que => ¿Qué; pd => P.D.:;
BigBear
Perlero frecuente
Perlero frecuente
 
Mensajes: 981
Registrado: 2009-03-01 18:39 @818

Publicidad

Re: Borrar etiquetas de una imagen

Notapor explorer » 2014-11-01 06:06 @296

Según el manual debería ser así:

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. $datos_imagen->SetNewValue("Model", undef);
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

o así:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. $datos_imagen->SetNewValue("Model");
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14486
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: Google [Bot] y 2 invitados

cron