my $self = shift;
my $data = shift if (@_);