Use of uninitialized value $hit_line_non_barrel in pattern match (m//) at ttt.pl line 735