use lftp in tcl

[samba]

I use the shell command:

Code: Select all

lftp -c 'open ip -u username,password -p port -e "mget /dir/"'

I want to use this in .tcl is that possible?

I already try:

Code: Select all

exec lftp -c 'open ip -u username,password -p port -e "mget /dir/"'

but that gives the msg:

Tcl error [test]: extra characters after close-quote

Anyone a idea?

[nml375]

Make sure you pass the whole command set as a single argument, such as this:

Code: Select all

exec lftp -c {open ip -u username,password -p port -e "mget /dir/"}
#or
exec lftp -c "open ip -u username,password -p port -e \"mget /dir/\""