$,=" ";while(<>){chomp();$_="0"x(8-length($_)).$_;print(int(substr($_,2,2)), int(substr($_,6,2)), int(substr($_,0,2)),int(substr($_,4,2))."\n")}