$count='000001';
substr($_,0,6)=$count++ for @ordered;