<>=~/ .* /; $\+= ($==$_/$&)>${$h=-1-$_%$&}+2*$'|!$$h ? 2*$'+1 : $=-$$h, $$h=$= for sort{$a-$b}map$_+2e9,glob<>; print