can't read "argv": no such variable
    while executing
"llength $argv"
    (in namespace eval "::request" script line 1)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
#!/usr/bin/tclsh

source [file join [file dirname [info script]] LesProcsDeGscope.tcl]

# needed ...
set OrdSrcDir [file dirname [info script]]

if {[llength $argv] == 0 || [string tolower [lindex $argv 0]] eq "help"} {
    HelpIDMapping
}

if {[llength $argv] != 3} {
    puts "\nError ! There should be 3 arguments :\nidmapping   \n"
    exit
}

InitIDMapping

lassign $argv from to idList
if {($from ni {"ACC+ID" ACC ID}) && ($to ni {ACC ID})} {
    puts "\nError ! FROM should be one of ACC+ID, ACC, ID, OR TO should be one of ACC, ID !\n"
    exit
}
if {$idList eq ""} {
    puts "\nError ! You should provide an IDs list as a file or as a list separated by comas\n"
    exit
}
if {! [file exists $idList]} {
    set Lids [split $idList ,]
} else {
    set Ll [LesLignesDuFichier $idList]
    set Lids [list]
    foreach l $Ll {
	set l [string trim $l]
	if {$l ne ""} {
	    lappend Lids $l
	}
    }
}
if {[llength $Lids] == 0} {
    puts "\nError ! No IDs given !\n"
    exit
}

package require http
set Lres [IDMapping $from $to $Lids]

puts "[join $Lres \n]"

exit