Select Code to Download

sub hole{map/^(.*?)\1+\z/s,@_}

sub hole{$,=pop;$,=$,<$_?$_:$,for@_;$,}

sub hole{$,=pop;$_<$,or$,=$_ for@_;$,}