| Akron | 151676d | 2016-03-14 20:12:14 +0100 | [diff] [blame] | 1 | package KorAP::XML::Annotation::Connexor::Sentences; |
| 2 | use KorAP::XML::Annotation::Base; |
| Nils Diewald | f03c680 | 2014-07-21 16:39:44 +0000 | [diff] [blame] | 3 | |
| 4 | sub parse { |
| 5 | my $self = shift; |
| 6 | my $i = 0; |
| 7 | |
| 8 | $$self->add_spandata( |
| 9 | foundry => 'connexor', |
| 10 | layer => 'sentences', |
| 11 | cb => sub { |
| 12 | my ($stream, $span) = @_; |
| Akron | 6a4cb16 | 2020-08-06 16:00:33 +0200 | [diff] [blame^] | 13 | $stream->pos($span->get_p_start) |
| 14 | ->add_span('<>:cnx/s:s', $span) |
| 15 | ->set_payload('<b>0'); |
| Nils Diewald | f03c680 | 2014-07-21 16:39:44 +0000 | [diff] [blame] | 16 | $i++; |
| 17 | } |
| 18 | ) or return; |
| 19 | |
| 20 | $$self->stream->add_meta('cnx/sentences', '<i>' . $i); |
| 21 | |
| 22 | return 1; |
| 23 | }; |
| 24 | |
| Nils Diewald | 32e30f0 | 2014-10-30 00:52:36 +0000 | [diff] [blame] | 25 | |
| 26 | sub layer_info { |
| Akron | 0b5cda2 | 2015-12-11 18:49:50 +0100 | [diff] [blame] | 27 | ['cnx/s=spans']; |
| Nils Diewald | 32e30f0 | 2014-10-30 00:52:36 +0000 | [diff] [blame] | 28 | }; |
| 29 | |
| Nils Diewald | f03c680 | 2014-07-21 16:39:44 +0000 | [diff] [blame] | 30 | 1; |