… | … | ||
---|---|---|---|
7 | # and scan pids and decode si info. | 7 | # and scan pids and decode si info. |
8 | 8 | ||
9 | my $PID = 18; # epg data and more | 9 | my $PID = 18; # epg data and more |
10 | 10 | ||
11 | use Event; | 11 | use Event; |
12 | use Fcntl; | ||
12 | use Linux::DVB; | 13 | use Linux::DVB; |
13 | 14 | ||
14 | use Data::Dumper; | 15 | use Data::Dumper; |
15 | 16 | ||
16 | my $sniff_only = 1; # set to zero to actively tune to a channel | 17 | my $sniff_only = 1; # set to zero to actively tune to a channel |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |