leave er in perl_seco_data_range