/: \w*$/&&${pop@@while grep$_%9==$`%9,@@;@r[1..@@]=@@=($`,@@)}for`xargs seq|factor`;print$r[-1]