$ex_date=substr($_,140,8);$ex_date =~ s/\s+$//;