1#!./perl 2 3chdir 't' if -d 't'; 4@INC = ('../lib', '.'); 5 6require 'thread_it.pl'; 7thread_it(qw(re pat_re_eval.t)); 8