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