my $rval = [ split(/,/,$rval) ];