/ 
downsexta-0.2-2
River stage zero No dependents
/ SextaXML

NOMBRE

DownVideos::SextaXML - Un módulo para obtener rutas a los vídeos de los programas de La Sexta

SINOPSIS

use DownVideos::SextaXML

my $xml = SextaXML->new(URL => $$capitulos[0]->{URL});

print "\n\n\nObteniendo datos del primer capítulo de Tiempo:\n\n";

print "\tNombre:\t\t" . $xml->nombre . "\n";
print "\tSección:\t" . $xml->seccion . "\n";
print "\tInfo:\t\t" . $xml->info . "\n";
print "\tDescripción:\t" . $xml->descripcion . "\n";
print "\tImagen:\t\t" . $xml->imagen . "\n";
print "\tVídeo:\t\t" . $xml->video . "\n";
print "\tRTMP:\t\t" . $xml->rtmp . "\n";
print "\tTipo:\t\t" . $xml->mime . "\n";
print "\tTamaño:\t\t" . $xml->tamanyo . " Megas\n\n\

DESCRIPCIÓN

Un módulo para obtener rutas a los vídeos de capítulos concretos de programas de La Sexta. Además proporciona información sobre el nombre, la sección, la descripción, el tipo mime y el tamaño del vídeo.

MÉTODOS

CONSTRUCTOR

new()
$xml = DataSexta->new( URL => $url_del_capitulo );

    Crea el objeto. El argumento es un par clave-valor en el que la clave debe ser "URL" y el valor la ruta a la página que contiene el reproductor de vídeo. Este argumento puede obtenerse de un modo sencillo mediante el módulo DownVideos::DataSexta.

  • $sexta (Objeto SextaXML=HASH)

ACCESORES

nombre()
$nombre = $xml->nombre();

    Obtiene el nombre o título del programa, serie o noticiero. No requiere argumentos.

  • $nombre (Cadena de texto)

    $nombre = "Capítulo 19"
seccion()
$seccion = $xml->seccion();

    Obtiene el nombre propio del programa. No requiere argumentos.

  • $seccion (Cadena de texto)

    $seccion = "Buena gente"
info()
$info = $xml->info();

    Obtiene información acerca del capítulo concreto. No requiere argumentos.

  • $info (Cadena de texto)

    $info = "Capítulo 19 Temporada: 1"
descripcion()
$descripcion = $xml->descripcion();

    Generalmente obtiene una descripcion del contenido del capítulo o información acerca del mismo.

  • $descripcion (Cadena de texto)

    $descripcion = "Ana consigue el papel de su vida y decide irse a Miami"
imagen()
$imagen = $xml->imagen();

    Obtiene la URL a una imágen del capítulo.

  • $imagen (Cadena de texto)

    $imagen = "http://www.lasexta.com/clipping/2013/07/17/00555/30.jpg"
rtpm()
$rtpm = $xml->rtpm();

    Obtiene la dirección rtpm para ver el vídeo con un reproductor.

  • $rtpm (Cadena de texto)

    $rtpm = "rtmp://a3-lasextafs.fplive.net/a3-lasexta/mp_seriesh3/2013/07/17/00005/000.f4v"
tipo()
$tipo = $xml->tipo();

    Obtiene el tipo MIME del fichero de vídeo.

  • $tipo (Cadena de texto)

    $tipo = "video/mp4"
tamanyo()
$tamanyo = $xml->tamanyo();

    Obtiene el tamaño en megas del fichero de vídeo.

  • $tamanyo (Cadena de texto)

    $tamanyo = "629.76"

EJEMPLO

Ejemplo de obtención de información sobre tres capítulos del noticiero Deportes:
#!/usr/bin/perl

use warnings;
use strict;
use utf8;
use encoding 'utf8';
use open 'locale';
use Encode;
use DownVideos::DataSexta;
use DownVideos::SextaXML;

my $sexta = DataSexta->new();

my $series = $sexta->get_series;

print "Programas de series:\n\n";
for my $p (@$series)
  {
  for my $k (keys $p)
    {
    print "\t$k\n";
    }
  }

my $capitulos = $sexta->get_capitulos("Buena gente");

my $xml = SextaXML->new(URL => $$capitulos[0]->{URL});

print "\n\n\nObteniendo datos del primer capítulo de Buena gente:\n\n";

print "\tNombre:\t\t" . $xml->nombre . "\n";
print "\tSección:\t" . $xml->seccion . "\n";
print "\tInfo:\t\t" . $xml->info . "\n";
print "\tDescripción:\t" . $xml->descripcion . "\n";
print "\tImagen:\t\t" . $xml->imagen . "\n";
print "\tVideo:\t\t" . $xml->video . "\n";
print "\tRTMP:\t\t" . $xml->rtmp . "\n";
print "\tTipo:\t\t" . $xml->mime . "\n";
print "\tTamaño:\t\t" . $xml->tamanyo . " Megas\n\n\n";

AUTOR

Hugo Morago Martín <morago@ono.com>

LICENCIA

Copyright © 2013 Hugo Morago Martín <morago@ono.com>

Este programa se distribuye bajo los términos de la GPL v3 del 29 de enero de 2007. Puede encontrar una copia de la misma en http://www.gnu.org/licenses/gpl-3.0.html