Evaluated set re [regexp -all -inline {<div><a href="(.+?)"} [wget http://wepump.in/ascii/]]; set out ""; for {set i 1} {$i < [llength $re]} {incr i 2} {scrape_ascii [lindex $re $i]}; . "done"