# using a loop:

if (@_) {
    $self->{$_} = shift for qw(stuff1 stuff2 stuff3);
}


# using a hash slice (probably the fastest alternative):

@$self{qw( stuff1 stuff2 stuff3 )} = @_ if @_;