egghelp/eggheads community

Passing arguments to a perl script

2004-07-29T08:47:18-04:00

ayup... that works well enough. *places dunce cap on head and sits in corner*

no need for that cap...it's not that obvious

eval is dangerous if you dont know what you're doing. You need an extra layer of escaping for parts that are meant to be passed on without substitutions. I guess I should have pointed this out in the first place...

Code:

set fileName {[die].now}eval exec $fileName $args# ...will invoke 'die'eval [list exec $fileName] $args# ...will do the right thing because the brackets are escaped by 'list'

Statistics: Posted by user — Thu Jul 29, 2004 8:47 am

Passing arguments to a perl script

2004-07-29T05:04:34-04:00

ayup... that works well enough. *places dunce cap on head and sits in corner*

Statistics: Posted by Guest — Thu Jul 29, 2004 5:04 am

Passing arguments to a perl script

2004-07-28T12:31:30-04:00

Code:

eval exec blah $args

Statistics: Posted by user — Wed Jul 28, 2004 12:31 pm

Passing arguments to a perl script

2004-07-28T08:52:11-04:00

Since TCL couldn't do what I wanted (blasphemy, I know), I made a perl script to do the grunt work... but I'm running into a problem... assuming that $args contains a list of argmunents like {-a 3 -b 4 -c 6}, then I do the following:

set output [exec something.pl $args]

then the perl program is passed one long argument... not seperated ones.
I've tried using 'list', 'join', 'concat', and a few others, but I can't get it right.. even when I use 'join', it seems to escape the spaces to make it one long string.

Can something help point out the (un)obvious answer to this?

Statistics: Posted by Guest — Wed Jul 28, 2004 8:52 am