rulenum
-
=back
=head1 METHODS
my $error =
$self->ut_numbern('ruleactionnum')
|| $self->ut_text('action')
- || $self->ut_text('params')
+ || $self->ut_textn('params')
|| $self->ut_foreign_key('rulenum', 'cgp_rule', 'rulenum')
;
return $error if $error;
$self->SUPER::check;
}
+=item arrayref
+
+=cut
+
+sub arrayref {
+ my $self = shift;
+ [ $self->action, $self->params ];
+}
+
=back
=head1 BUGS