- my %ids = ( $from_to => [ grep { $_ } map { $_ * 1 } split m/\s+/, $params{"${from_to}_ids"} ] );
+ my %ids;
+
+ if ('ARRAY' eq ref $params{"${from_to}_ids"}) {
+ $ids{$from_to} = $params{"${from_to}_ids"};
+ } else {
+ $ids{$from_to} = [ grep { $_ } map { $_ * 1 } split m/\s+/, $params{"${from_to}_ids"} ];
+ }
$ids{$to_from} = [ ($params{"${to_from}_id"}) x $num ];
@links = map { { 'from_table' => $params{from_table},
'from_id' => $ids{from}->[$_],
$ids{$to_from} = [ ($params{"${to_from}_id"}) x $num ];
@links = map { { 'from_table' => $params{from_table},
'from_id' => $ids{from}->[$_],