($/=get.words;min(+$0,+$1)~~say <Alice Bob>[2>$_||$3+&(3>$_||8>$3)])xx get