/ 
WriteAt-0.07
River stage zero No dependents
/ WriteAt

NAME

WriteAt - suite for make books and docs in pod6 format

SYNOPSIS

=TITLE MyBook
=SUBTITLE My first free book
=AUTHOR Alex Green
=DESCRIPTION  Short description about this book
=begin CHANGES
Aug 18th 2010(v0.2)[zag]   preface

May 27th 2010(v0.1)[zag]   Initial version
=end CHANGES
 
=Include src/book_preface.pod
=CHAPTER Intro

B<Pod> is an evolution of Perl 5's L<I<Plain Ol' Documentation>|doc:perlpod>
(POD) markup. Compared to Perl 5 POD, Perldoc's Pod dialect is much more 
uniform, somewhat more compact, and considerably more expressive. The
Pod dialect also differs in that it is a purely descriptive mark-up
notation, with no presentational components.

DESCRIPTION

Books must be high available for readers and writers ! WriteAt - suite for free book makers. It help make and prepare book for publishing.

INSTALLATION

There are several ways to install WriteAt to your system.

Install under Ubuntu

sudo add-apt-repository ppa:zahatski/ppa
sudo apt-get install writeat

From CPAN

cpanm WriteAt

For book creation it is necessary following software:

* docbook-4.5
* xslt processor
* GNU make

Checkout templates

Grab template:

git clone https://github.com/zag/writeat-tmpl-firstbook.git
cd writeat-tmpl-firstbook
make

Point your web brouser to index.html file in work directory.

FUNCTIONS

{
   =tagname
   =childs
}

make_levels ( blockname, level, $parsed_tree )

Make tree using levels

my $tree = Perl6::Pod::Utl::parse_pod( $t, default_pod => 1 )
    || die "Can't parse ";
my ($root) = @$tree;
my $tree1 = $tree;
if ( $root->name eq 'pod' ) {
    $tree1 = $root->childs;
}

my $levels = &WriteAt::make_levels( "CHAPTER", 0, $tree1 );

return 

[
    {
        node => {ref to object},
        childs => [ array of childs]
    
    },
    ...
]

get_text(node1, node2, ...)

return string of all childs texts nodes

rus2lat

Translit rus to lat ( gost 7.79-2000 )

rus2lat('russian text');

get_time_stamp_from_string <str>

Get time stamp from strnigs like this:

2012-11-27T09:39:19Z
2012-11-27 09:39:19
2012-11-27 09:39
2012-11-27 09
2012-11-27

return unixtimestamp

unixtime_to_string timestamp

Return

METHODS

SEE ALSO

Perl6::Pod, The world's first book in the pod6 format: Russian book "Everything about Perl 6" https://github.com/zag/ru-perl6-book, book template: https://github.com/zag/writeat-tmpl-firstbook.git, russian book template: https://github.com/zag/writeat-tmpl-firstbook-ru.git

AUTHOR

Zahatski Aliaksandr, <zag@cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2012-2015 by Zahatski Aliaksandr

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