MythTV  0.27pre
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends Groups Pages
Functions | Variables
twit.tv.pl File Reference

Go to the source code of this file.

Functions

 mnvloadconfig (fileparse($Script, '.pl'),"notused")
 our ($opt_v, $opt_T, $opt_p, $opt_S)
foreach my $contenturl (@links)
 getopts ('vtTp:S:')
 if ($opt_v)
 elsif ($opt_S)
 if (($ss)&&(time()-$ss->mtime)< mnvgetconfig('cachetime'))
 mnvrssfooter ()

Variables

use strict
use warnings
use Encode
use Storable
use FindBin $Bin
use FindBin $Script
use lib $Bin nv_perl_libs
use mnvcommonsubs
my $version = '$Revision: 1.32 $'
my $command = "twit.tv.pl"
my $commandthumbnail = "twit.tv.png"
my $author = "Auric"
my $site = 'TWiT.tv'
my $description = 'Leo Laporte &amp
 Friends
my $baseurl = "/tmp/.${site}.diritemsref.store"
my diritems
my $count = 0
my $type
my $page = 1
my $search = ""
my $diritemsref = \%diritems
my $totalitems = 0
my $filtereditems = 0
my $ss = stat($store)
print< channel >< title >
$site</title >< link >
$baseurl</link >< description >
$description</description > 
n
 mnvcleanexit

Function Documentation

mnvloadconfig ( fileparse($Script, '.pl')  ,
"notused"   
)
our (   $opt_v,
  $opt_T,
  $opt_p,
  $opt_S 
)
foreach my $contenturl ( links)

Definition at line 282 of file twit.tv.pl.

getopts ( 'vtTp:S:'  )
if (   $opt_v)

Definition at line 348 of file twit.tv.pl.

elsif (   $opt_S)

Definition at line 357 of file twit.tv.pl.

if ( )

Definition at line 374 of file twit.tv.pl.

mnvrssfooter ( )

Variable Documentation

use strict

Definition at line 34 of file twit.tv.pl.

use warnings

Definition at line 35 of file twit.tv.pl.

use Encode

Definition at line 43 of file twit.tv.pl.

use Storable

Definition at line 44 of file twit.tv.pl.

use FindBin $Bin

Definition at line 47 of file twit.tv.pl.

use FindBin $Script

Definition at line 47 of file twit.tv.pl.

use lib $Bin nv_perl_libs

Definition at line 48 of file twit.tv.pl.

use mnvcommonsubs

Definition at line 49 of file twit.tv.pl.

$version = '$Revision: 1.32 $'

Definition at line 56 of file twit.tv.pl.

my $command = "twit.tv.pl"

Definition at line 57 of file twit.tv.pl.

my $commandthumbnail = "twit.tv.png"

Definition at line 57 of file twit.tv.pl.

my $author = "Auric"

Definition at line 57 of file twit.tv.pl.

my $site = 'TWiT.tv'

Definition at line 58 of file twit.tv.pl.

my $description = 'Leo Laporte &amp

Definition at line 59 of file twit.tv.pl.

Friends

Definition at line 59 of file twit.tv.pl.

my $baseurl = "/tmp/.${site}.diritemsref.store"

Definition at line 60 of file twit.tv.pl.

my diritems

Definition at line 64 of file twit.tv.pl.

return $count = 0

Definition at line 281 of file twit.tv.pl.

my $type

Definition at line 354 of file twit.tv.pl.

my $page = 1

Definition at line 354 of file twit.tv.pl.

my $search = ""

Definition at line 354 of file twit.tv.pl.

my $diritemsref = \%diritems

Definition at line 371 of file twit.tv.pl.

my $totalitems = 0

Definition at line 372 of file twit.tv.pl.

my $filtereditems = 0

Definition at line 372 of file twit.tv.pl.

my $ss = stat($store)

Definition at line 373 of file twit.tv.pl.

print<channel><title> $site</title><link> $baseurl</link><description> $description</description> n

Definition at line 389 of file twit.tv.pl.

mnvcleanexit

Definition at line 405 of file twit.tv.pl.