#!/bin/sh

# Copyright for the scripts in this file (c) 2002,
# by Gerald Banon. All rights reserved.

# Converts the specified .metadataArray.tcl file(s) into ascii files

# run.tcl \
exec /usr/local/bin/tclsh "$0" ${1+"$@"}

lappend auto_path ../../../../../../col/dpi.inpe.br/banon/2002/08.01.15.28/doc

package require dpi.inpe.br/banon/2002/08.01.15.28 2.1

# set pathList C:/usuario/gerald/URLib/col/dpi.inpe.br/banon/1998/08.02.08.56/auxdoc/.metadataArray.tcl
# lappend pathList C:/usuario/gerald/URLib2/col/dpi.inpe.br/banon/1998/08.02.08.56/auxdoc/.metadataArray.tcl
 set pathList /dados/URLib/col/dpi.inpe.br/banon/1998/08.02.08.56/auxdoc/.metadataArray.tcl
 lappend pathList /iris3/URLibSRE/col/dpi.inpe.br/banon/1998/08.02.08.56/auxdoc/.metadataArray.tcl
 lappend pathList /dados/URLibSBSR/col/dpi.inpe.br/banon/1998/08.02.08.56/auxdoc/.metadataArray.tcl

puts [dpi.inpe.br/banon/2002/08.01.15.28::metadataArray2ASCII $pathList 0]

# Example:
# cd C:/usuario/gerald/URLib/col/dpi.inpe.br/lise/2002/08.21.10.55/doc
# cd /dados/URLib/col/dpi.inpe.br/lise/2002/08.21.10.55/doc
# source run.tcl
# done