sub sprit
{
    return ( $_[1] =~ /(.*?)(?:$_[0]|$)/g );
}