sub do_somn { my $self = shift; for my $username ($self->{username}) { my $a = $username; my $b = $username; # ... } } #### /x/ and $_ .= "y" for $self->{option}; #### $self->{option} .= "y" if $self->{option} =~ /x/;