do{$|=printf"%03u
",$.}while<>!~u