sub some_func {
        my $self = shift;
        my @data = 'ARRAY' eq ref $_[0]
            ? @$_[0]
            : @_;
        # do stuff
    }