I give you a piece of code I use for something quite similar.. (move an entire subtree from a location to another)
hope that helps...
my $name = pop @subs;
$move_subcat_to ? ($move_subcat_to .= "/$name") : ($move_subcat_to = "$name");
$query = qq! UPDATE Category
SET Name = REPLACE(Name,'$move_subcat_from','$move_subcat_to')
WHERE Name LIKE '$move_subcat_from/%' or
Name = '$move_subcat_from'
!;
$result = $db->do ($query);
ciao
lepo
Lepo - lepo@lepo.org
hope that helps...
Code:
my @subs = split("\/", $move_subcat_from); my $name = pop @subs;
$move_subcat_to ? ($move_subcat_to .= "/$name") : ($move_subcat_to = "$name");
$query = qq! UPDATE Category
SET Name = REPLACE(Name,'$move_subcat_from','$move_subcat_to')
WHERE Name LIKE '$move_subcat_from/%' or
Name = '$move_subcat_from'
!;
$result = $db->do ($query);
ciao
lepo
Lepo - lepo@lepo.org