$r='(\d+ )';
print"@{[sort{$a-$b}glob<>]} "=~
/^$r\1| $r\2(\2|$r$r\5)|$r\6$/
?NO:YES