%order = ( DATE => '1', CPP => '2', ESN => '3', BTS => '4' ); #### @to_be_ordered = qw(CPP BTS DATE);