sub _split{
    @_ == 1 and $#_++;
    [@_[0..@_/2-1]], 
    [@_[@_/2..@_-1]]
}

__STDOUT__
<><>
<1><>
<1><2>
<1><2 3>
<1 2><3 4>
<1 2><3 4 5>