Configure::Writer (3) - Linux Manuals

Configure::Writer: Configuration file writer for XMLTV grabbers

NAME

XMLTV::Configure::Writer - Configuration file writer for XMLTV grabbers

DESCRIPTION

Utility class that helps grabbers write configuration descriptions.

SYNOPSIS

  use XMLTV::Configure::Writer;

  my $result;
  my $writer = new XMLTV::Writer::Configure( OUTPUT => \$result,
                                             encoding => 'iso-8859-1' );
  $writer->start( { grabber => 'tv_grab_xxx' } );
  $writer->write_string( {
    id => 'username', 
    title => [ [ 'Username', 'en' ],
               [ 'Anva.ndarnamn', 'sv' ] ],
    description => [ [ 'The username for logging in to DataDirect.', 'en' ],
                     [ 'Anva.ndarnamn hos DataDirect', 'sv' ] ],
    } );
  $writer->start_selectone( {
    id => 'lineup', 
    title => [ [ 'Lineup', 'en' ],
               [ 'Programpaket', 'sv' ] ],
    description => [ [ 'The lineup of channels for your region.', 'en' ],
                     [ 'Programpaket fo.r din region', 'sv' ] ],
    } );

  $writer->write_option( { 
    value=>'eastcoast',
    text=> => [ [ 'East Coast', 'en' ],
                [ 'O.stkusten', 'sv' ] ] 
  } );

  $writer->write_option( { 
    value=>'westcoast',
    text=> => [ [ 'West Coast', 'en' ],
                [ 'Va.stkusten', 'sv' ] ] 
  } );

  $writer->end_selectone();

  $writer->end();

  print $result;

EXPORTED FUNCTIONS

None.

METHODS

start()

Write the start of the <xmltvconfiguration> element. Parameter is a hashref which gives the attributes of this element.

write_string()

Write a <string> element. Parameter is a hashref with the data for the element:

  $writer->write_string( {
    id => 'username', 
    title => [ [ 'Username', 'en' ],
               [ 'Anva.ndarnamn', 'sv' ] ],
    description => [ [ 'The username for logging in to DataDirect.', 'en' ],
                     [ 'Anva.ndarnamn hos DataDirect', 'sv' ] ],
    default => "",
    } );

To add a constant use 'constant' key:         If constant value is empty then revert to 'ask' procedure.

  $writer->write_string( {
    id => 'version', 
    title => [ [ 'Version number', 'en' ] ],
    description => [ [ 'Automatically added version number - no user input', 'en' ] ],
    constant => '123',
    } );

POD ERRORS

Hey! The above document had some coding errors, which are explained below:

Around line 44:

Non-ASCII character seen before =encoding in ''Anva.ndarnamn','. Assuming ISO8859-1