Help for this page

Select Code to Download


  1. or download this
    for ( @{ $self->{event} } ) {
     next if ref($_) ne 'CODE';
     &{$_}(@args);
}
  2. or download this
    print "---START---\n";
for ( @{ $self->{event} } ) {
...
     next if ref($_) ne 'CODE';
     &{$_}(@args);
}
  3. or download this
    ---START---
help.search => CODE(0x9bcb9b0)
...
---START---
help.search => -f
help.search => CODE(0xa2f8618)
  4. or download this
    print "---START---\n";
for my $item ( @{ $self->{event} } ) {
...
     next if ref($item) ne 'CODE';
     &{$item}(@args);
}
  5. or download this
    ---START---
help.search => CODE(0x9bcb9b0)
...
---START---
help.search => CODE(0x9bcb9b0)
help.search => CODE(0xa2f8618)