MJAM/Connector/LocalFile.pm

package MJAM::Connector::LocalFile;

use POE qw ( Component::File::FollowTailSimple );

sub start {
  my $cfg = shift;
  return POE::Component::File::FollowTailSimple::spawn($cfg);
}

sub stop {
  my $alias = shift;
  my $session_to_kill = $poe_kernel->alias_resolve($alias);
  #$kernel->post($session_to_kill, 'shutdown');
  $poe_kernel->signal($session_to_kill, "TERM");
}

1;
1	package MJAM::Connector::LocalFile;
2
3	use POE qw ( Component::File::FollowTailSimple );
4
5	sub start {
6	my $cfg = shift;
7	return POE::Component::File::FollowTailSimple::spawn($cfg);
8	}
9
10	sub stop {
11	my $alias = shift;
12	my $session_to_kill = $poe_kernel->alias_resolve($alias);
13	#$kernel->post($session_to_kill, 'shutdown');
14	$poe_kernel->signal($session_to_kill, "TERM");
15	}
16
17	1;
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26