TV::Anytime::Service - Represent a television or radio service

  print "Name is "  . $service->name . "\n";
  print "Owner is " . $service->owner . "\n";
  print "Logo is "  . $service->logo . "\n";
  print "Is tv\n" if $service->is_television;
  print "Is radio\n" if $service->is_radio;
  my @genres = $service->genres;

  my @programs = $service->programs;
  my @events   = $service->events;

The TV::Anytime::Service represents a television or radio

This returns a list of TV::Anytime::Event objects which represent transmissions on the service:

  my @events   = $service->events;

This returns a list of TV::Anytime::Genre objects which apply to the service:

  my @genres = $service->genres;

This returns if the service is a radio station:

  print "Is radio\n" if $service->is_radio;

This returns if the service is a television station:

  print "Is tv\n" if $service->is_television;

This returns a URL to a logo for the service:

  print "Logo is "  . $service->logo . "\n";

This returns the name of the service:

  print "Name is "  . $service->name . "\n";

This returns the owner of the service:

  print "Owner is " . $service->owner . "\n";

This returns a list of TV::Anytime::Program objects which represent the various programs on the service:

  my @programs = $service->programs;

TV::Anytime, TV::Anytime::Event, TV::Anytime::Genre, TV::Anytime::Service

Please report any bugs or feature requests to bug-TV-Anytime@rt.cpan.org, or through the web interface at http://rt.cpan.org.

Leon Brocard acme@astray.com

Copyright (c) 2005, Leon Brocard acme@astray.com. All rights reserved.

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.