Changeset 8019 for lang/perl/App-MadEye

Show
Ignore:
Timestamp:
03/17/08 12:18:34 (9 months ago)
Author:
tokuhirom
Message:

- Agent::Ping: added docs
- Agent::Ping: added schema

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/App-MadEye/trunk/lib/App/MadEye/Plugin/Agent/Ping.pm

    r7553 r8019  
    99    my ($self, $host) = @_; 
    1010 
    11     my $conf = $self->config->{config}; 
    12     my $timeout = $conf->{timeout} || 5; 
     11    my $timeout = $self->config->{config}->{timeout}; 
    1312 
    1413    my $p = Net::Ping->new("tcp"); 
    … …  
    2524 
    26251; 
     26__END__ 
    2727 
     28=head1 NAME 
     29 
     30App::MadEye::Plugin::Agent::Ping - ping! ping! 
     31 
     32=head1 SCHEMA 
     33 
     34    type: map 
     35    mapping: 
     36        target: 
     37            type: seq 
     38            required: yes 
     39            sequence: 
     40                - type: str 
     41        timeout: 
     42            required: yes 
     43            type: int 
     44 
     45=head1 AUTHOR 
     46 
     47Tokuhiro Matsuno 
     48 
     49=head1 SEE ALSO 
     50 
     51L<App::MadEye>, L<Gearman::Client>, L<Gearman::Worker> 
     52