#!perl -pla
$_=(sort@F)[~/R/]