Re: Tcl faster than Perl/Python...but only with tricks...



slebetman@xxxxxxxxx wrote:
.................

Then I would like to have "pushable" stream modules.

set fd [ open InputFile r ]
chan $fd popall
chan $fd push regexp_filter

OR
Would a variable with "lazy content" be possible in tcl?

set fd [ open InputFile r ]
chan $fd mapto content_of_file_var

puts [join [regexp -all -inline -linestop -nocase {.*destroy.*\n} $content_of_file_var ]
{}]

uwe

.