LINUX.ORG.RU
Форум — Development  

Поможите с tcl а то все маны исчитал до дыр на мониторе не помогло


0

0

regsub -all {[^A-Za-z0-9!_]} $char [code &] num во так я думал сделать urlcoding и никак почему то & не подставляется никак и code вызывается один раз не пойму чо делать то ..... на perl всё просто $ch=~s/[^0-9A-Za-z]/sprintf("%%%X",ord($&))/ge; а вот с этим tcl уж намучался и доки отчень уж сухие

★

А чо сделать то хотел? [code &] - при разборе строки вызывается один раз code с аргументом & и результат в строку и подставляется. Если хотел найденное через code пропустить то надо: set start 0 while{![regexp -indices -start $start -- --{--regexp--} $char num ind]} { regsub -start $start -- {--regexp--} $char [code num] set start [lindex $ind 0] } или что-то в этом духе, хотя это долго работать будет, быстрее строку по символам разобрать самому. Это тебе не перл.

nsh

anonymous
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Development