Rev 7270 | Rev 7352 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 7270 | Rev 7328 | ||
---|---|---|---|
Line 1... | Line -... | ||
1 | - | ||
- | 1 | !!! input:url_to_analyse name_of_parameters_asked |
|
- | 2 | !!! output: the variable contained in name_of_parameters_asked |
|
2 | !set parmtoread=!singlespace $wims_read_parm |
3 | !set parmtoread=!singlespace $wims_read_parm |
3 | !set parmtoread=!words2items $parmtoread |
4 | !set parmtoread=!words2items $parmtoread |
4 | !set parmtoread=!nonempty items $parmtoread |
5 | !set parmtoread=!nonempty items $parmtoread |
5 | !set url=$(parmtoread[1]) |
6 | !set url=$(parmtoread[1]) |
6 | !set parmtoread=$(parmtoread[2..-1]) |
7 | !set parmtoread=$(parmtoread[2..-1]) |
Line 9... | Line 10... | ||
9 | 10 | ||
10 | !set testw=!replace internal & by $\ |
11 | !set testw=!replace internal & by $\ |
11 | $ in $url |
12 | $ in $url |
12 | !set testw=!replace internal = by , in $testw |
13 | !set testw=!replace internal = by , in $testw |
13 | !set testw=!select $testw where column 1=$p_ |
14 | !set testw=!select $testw where column 1=$p_ |
14 | !set $p_=!nospace $(testw[2]) |
15 | !set $p_=!nospace $(testw[;2]) |
15 | !next |
16 | !next |
16 | 17 |