+sub tokenized {
+ my $self = shift;
+ my $payinfo = scalar(@_) ? shift : $self->payinfo;
+ ## or just $self->cust_main->tokenized($payinfo) ??
+ ## everything that currently uses this mixin is linked to cust_main,
+ ## but just in case, false laziness w/ FS::cust_main::Billing_Realtime
+ $payinfo =~ /^99\d{14}$/;
+}
+