Help for this page

Select Code to Download


  1. or download this
    sub do_somn {
    my $self = shift;
    for my $username ($self->{username}) {
...
        # ...
    }
}
  2. or download this
    /x/ and $_ .= "y" for $self->{option};
  3. or download this
    $self->{option} .= "y" if $self->{option} =~ /x/;