if($line2=~ m/(\d*)\s*([A-Z]*)\s*(\d*)-(\d*)/)