foreach $target_table (@tfl_list) {
	print "Target Table = $target_table\n";
	foreach $tfl_line (@tfl_file) {
		print "  Ref Table = $tfl_line->[9]";
		if ($target_table eq $tfl_line->[9]){
			#Do Something
		}
	}
}