Is There A Script To Unlink?

I'm wondering if there is a script to unlink a multi-prim object say on_touch, if so would someone please have an example???

Not a script, a handy function:

http://www.lslwiki.net/lslwiki/wakka.php?wakka=llBreakAllLinks

Note you'll need to get perms first.

I'll check it out now

syntax error

integer PERMISSION_CHANGE_LINKS
default
{
state_entry()
{
}

touch_start(integer total_number)
{
llBreakAllLinks
}
}

try something like:

integer gotPerms;   //not really necessary, but kinda shows the flow

default
{
    state_entry()
    {
        llRequestPermissions(llGetOwner(), PERMISSION_CHANGE_LINKS);
    }
    run_time_permissions(integer perms)
    {
        if (perms & PERMISSION_CHANGE_LINKS)
            gotPerms = TRUE;
    }
    touch_start(integer total_number)
    {
        if (gotPerms)
            llBreakAllLinks();
    }
}

cheers mate anything you tell me works so, I know it will thanks again