From: MartinLemburg on
Hello,

since I want to manipulate the meta data of JPEG files from within
tcl, I'm looking for a package allowing to access and to change IPTC
and/or XMP information!

Does someone already has done an implementation in tcl or a
interfacing job for a library?
Or has someone experiences with the exiftool executable used from
within tcl via "exec"?

Any thought is welcome!

Best regards,

Martin Lemburg
From: AF on
although the jpeg module doesnt directly support iptc or xmp you can
use it to get at the data fairly easily and then interpret it
yourself.

package require jpeg
set fh [jpeg::openJFIF myfile.jpg]
set iptc [lsearch -exact -index 0 [jpeg::markers $fh] ed]
seek $fh [lindex $iptc 1] start
set iptcdata [read $fh [lindex $iptc 2]]

i think for xmp you want to search for the second e1 marker, first
would be exif.

On Jan 14, 1:51 am, "MartinLemburg(a)Siemens-PLM"
<martin.lemburg.siemens-...(a)gmx.net> wrote:
> Hello,
>
> since I want to manipulate the meta data of JPEG files from within
> tcl, I'm looking for a package allowing to access and to change IPTC
> and/or XMP information!
>
> Does someone already has done an implementation in tcl or a
> interfacing job for a library?
> Or has someone experiences with the exiftool executable used from
> within tcl via "exec"?
>
> Any thought is welcome!
>
> Best regards,
>
> Martin Lemburg