EBook-Ishmael
4 results

 view release on metacpan or  search on metacpan

lib/EBook/Ishmael/EBook/FictionBook2.pm  view on Meta::CPAN 

                }
            } elsif ($name eq 'publisher') {
                $self->{Metadata}->add_contributor($n->textContent);
            } elsif ($name eq 'book-name') {
                $self->{Metadata}->set_title($n->textContent);
            }
        }
    }

    for my $n ($xpc->findnodes('/FictionBook:FictionBook/FictionBook:binary')) {
        my $mime = $n->getAttribute('content-type');
        next if not defined $mime;
        my $format = mimetype_id($mime);
        next if not defined $format;
        push @{ $self->{_images} }, [ $n, $format ];
    }

    my ($covmeta) = $xpc->findnodes('./FictionBook:coverpage', $title);
    # Put if code inside own block so we can easily last out of it.
    if (defined $covmeta) {{
        my ($img) = $xpc->findnodes('./FictionBook:image', $covmeta)
            or last;
        my $href = $img->getAttribute('l:href') or last;
        $href =~ s/^#//;
        my ($binary) = $xpc->findnodes(
            "/FictionBook:FictionBook/FictionBook:binary[\@id=\"$href\"]"
        ) or last;
        my $mime = $binary->getAttribute('content-type');
        last if not defined $mime;
        my $format = mimetype_id($mime);
        last if not defined $format;
        $self->{_cover} = [ $binary, $format ];
    }}

    return 1;

}

t/data/chardet/cp1255/gpl3-he.html  view on Meta::CPAN 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
   <head>
      <title>
         GPL - Gnu&#39;s General Public License version 3- Hebrew Translation
      </title>
      <meta http-equiv="KEYWORDS" content="GPL, Gnu, General Pulic License, Hebrew, translation, free software," />
      <meta http-equiv="DESCRIPTION" content="A Hebrew translation of the GPL version 3- Gnu&#39;s General Pulic License" />
      <meta http-equiv="content-type" content="text/html; charset=iso-8859-8-I" />

<style type="text/css">
<!--
 body{line-height: 130%;font-size:80%;font-family:Arial, Helvetika,sans-serif;direction:rtl}
 div.c1 {background-color: #f0e1c1; border: thin dashed #996600; padding: 5pt; }
 div.dic {padding: 10px; border: thin Black solid; margin-bottom: 5px; height:90px;}
 p.lic, ol {padding-right: 30px;}
 p.saif {font-weight: bold;color: #660000;}
 .lic1 {margin-right:30px;text-indent:-25px:}
 -->

t/data/chardet/utf8/gpl3-he.html  view on Meta::CPAN 

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
   <head>
      <title>
         GPL - Gnu&#39;s General Public License version 3- Hebrew Translation
      </title>
      <meta http-equiv="KEYWORDS" content="GPL, Gnu, General Pulic License, Hebrew, translation, free software," />
      <meta http-equiv="DESCRIPTION" content="A Hebrew translation of the GPL version 3- Gnu&#39;s General Pulic License" />
      <meta http-equiv="content-type" content="text/html; charset=iso-8859-8-I" />

<style type="text/css">
<!--
 body{line-height: 130%;font-size:80%;font-family:Arial, Helvetika,sans-serif;direction:rtl}
 div.c1 {background-color: #f0e1c1; border: thin dashed #996600; padding: 5pt; }
 div.dic {padding: 10px; border: thin Black solid; margin-bottom: 5px; height:90px;}
 p.lic, ol {padding-right: 30px;}
 p.saif {font-weight: bold;color: #660000;}
 .lic1 {margin-right:30px;text-indent:-25px:}
 -->

t/data/gpl3.fb2  view on Meta::CPAN 

<p>This program comes with ABSOLUTELY NO WARRANTY; for details type `show w’.</p>
<p>This is free software, and you are welcome to redistribute it</p>
<p>under certain conditions; type `show c’ for details.</p>
<p>The hypothetical commands `show w’ and `show c’ should show the appropriate parts of the General Public License. Of course, your program’s commands might be different; for a GUI interface, you would use an “about box”.</p>
<p> </p>
<p>You should also get your employer (if you work as a programmer) or school, if any, to sign a “copyright disclaimer” for the program, if necessary. For more information on this, and how to apply and follow the GNU GPL, see &lt;https://www.gnu.o...
<p> </p>
<p>The GNU General Public License does not permit incorporating your program into proprietary programs. If your program is a subroutine library, you may consider it more useful to permit linking proprietary applications with the library. If this is w...
</section>
</body>
<binary id="img_0" content-type="image/jpeg">/9j/4AAQSkZJRgABAQEAYABgAAD/2wBDAAMCAgMCAgMDAwMEAwMEBQgFBQQEBQoHBwYIDAoM
DAsKCwsNDhIQDQ4RDgsLEBYQERMUFRUVDA8XGBYUGBIUFRT/2wBDAQMEBAUEBQkFBQkUDQsN
FBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBT/wAAR
CAEsASwDASIAAhEBAxEB/8QAHgABAAIDAQEBAQEAAAAAAAAAAAcIBAUGCQMCAQr/xAA/EAAC
AgEEAQMDAgMGBAYABwABAgMEBQAGBxESCBMhFCIxQVEVMmEJFiNCcYEkM0NSYnKCkaGxFzRU
c6LB4f/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAAAAAAAAAA/9oADAMB
AAIRAxEAPwD1T0000DTTTQNNNNA0000DTTTQNNNNA0000DTTTQNNNNA0000DTTTQNNNNA000
0DTTTQNNNNA0000DTTTQNNNNA0000DTTTQNNNNA0000DTTTQNNcvvrlHZ/GOOa/u7dGI23UA
793KXI4Af9PIgn/Qajmr6stubkLf3M2rvXfcYUMtrDbfmiqSA/gpZs+zE4P7q5Ggm7TUJj1B
7sDt7nAnIiRj8OJMQ3f+wvk6zavqCyDTtFd4j5Dx7KnmWbHVp16/oYrDgn+g7Ogl/TUCT+tL
YuMnkizWC35t8xnqSTJbMySxoP1YusLKFH799alDj3lbZvLGIGT2bubF7lo/hpcdaWXwP7OA



( run in 2.122 seconds using v1.01-cache-2.11-cpan-524268b4103 )