Changeset 369 for library/perl/trunk/Archer/lib/Archer/Plugin/Shell.pm
- Timestamp:
- 02/12/07 04:24:44 (3 years ago)
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
library/perl/trunk/Archer/lib/Archer/Plugin/Shell.pm
r368 r369 44 44 45 45 my $manager = $parallel->new; 46 $manager->run( 47 { elems => $self->{servers}, 48 callback => sub { 49 my $server = shift; 50 $self->callback($server, $cmd, @args); 51 }, 52 num => $self->{config}->{para}, 53 } 54 ); 46 $manager->run({ 47 elems => $self->{servers}, 48 callback => sub { 49 my $server = shift; 50 $self->callback($server, $cmd, @args); 51 }, 52 num => $self->{config}->{para}, 53 }); 55 54 } 56 55
