求助,关于PPTP自动修改路由表IP的问题

ee007

看过wwjun和zooyo老大的教程.
发觉ADSL分流自动改路由表的脚本,可以修改成用来做pptp-out连接自动修改路由表的作用.
一下是原脚本:
:local assign-address
:local new-address
:local status
:local x
:set x 3  --- 有几条ADSL 就填几...这里是3
:for i from=1 to=$x do={     ---- 执行从1 到 3 pppoe-out 的连接
    :set status [/interface get [/interface find  name=("pppoe-out" . $i)] running]
    :if ($status=true) do={
     :set new-address [/ip address get [/ip address find dynamic=yes interface=("pppoe-out" . $i)] address]
     :set new-address [:pick $new-address 0 ([:len $new-address] -3)]
     :set assign-address [/ip address get [/ip address find dynamic=no interface=("pppoe-out" . $i)] address]
     :set assign-address [:pick $assign-address 0 ([:len $assign-address] -3)]
        :if ($assign-address != $new-address) do={
        /ip address set [/ip address find comment=$i] address=$new-address network=$new-address broadcast=$new-address
        /ip route set [/ip route find comment=$i] gateway=$new-address
       }
   }
}


现在可以改成:
:local assign-address
:local new-address
:local status
:local x
:set x 3
:for i from=1 to=$x do={    :set status [/interface get [/interface find  name=("pptp-out" . $i)] running]
    :if ($status=true) do={
     :set new-address [/ip address get [/ip address find dynamic=yes interface=("pptp-out" . $i)] address]
     :set new-address [:pick $new-address 0 ([:len $new-address] -3)]
     :set assign-address [/ip address get [/ip address find dynamic=no interface=("pptp-out" . $i)] address]
     :set assign-address [:pick $assign-address 0 ([:len $assign-address] -3)]
        :if ($assign-address != $new-address) do={ \
        /ip address set [/ip address find comment=$i] address=$new-address network=$new-address broadcast=$new-address
        /ip route set [/ip route find comment=$i] gateway=$new-address
       }
   }
}
}
请问各位有什么办法可以将comment的注释改成VPN1 VPN2???  ....不胜感激!