App-Followme

 view release on metacpan or  search on metacpan

lib/App/Followme/Initialize.pm  view on Meta::CPAN

        <a href="photos/index.html">Photos</a>
    </nav>
</footer>
</body>
</html>
#>>> copy text theme.css
/*
    Global styles
*****************/
body {
    font-family: helvetica, arial, sans-serif;
    line-height: 1.5;
    margin: 0 auto;
    max-width: 50em;
    padding: 0 1em;
}
h1, h2, h3, h4, h5, h6 {
    margin: 1em 0 0.5em 0;
    line-height: 1.2em;
}
img {
    max-width: 100%;
}
figure {
    margin: 1em 0;
    text-align: center;
}
figcaption {
    font-size: small;
}
pre, code, samp, kbd {
    color: #009;
    font-family: monospace, monospace;
    font-size: 0.9em;
}
pre code, pre samp, pre kbd {
    font-size: 1em;
}
pre kbd {
    color: #060;
}
pre {
    background: #eee;
    padding: 0.5em;
    overflow: auto;
}
blockquote {

lib/App/Followme/Initialize.pm  view on Meta::CPAN

/*
    Header
*****************/
header {
    padding: 0; 
    background: #222;
    border-radius: 6px;
}
.title {
    padding: 16px;
    font-size: 1.75em;
}
.title a {
    text-decoration: none;
    color: #aaa; 
}
.title a:hover {
      color: #fff;
}
/*
    Footer

lib/App/Followme/Initialize.pm  view on Meta::CPAN

    text-decoration: none;
    color: #aaa; 
}
.footer-content a:hover {
    color: #fff;
}
/*
    Menu
*****************/
.dropbtn {
    font-size: 1.75em;
    background-color: #222;
    color: #aaa;
    border: none;   
    cursor: pointer;
}  
.dropdown {
    position: relative;
    display: inline-block;
} 
.dropdown-content {

share/clean.pl  view on Meta::CPAN

use IO::File;
use Getopt::Std;

use App::Followme::Web;

# False outside of body tags, true inside
our $in_body;

use constant PATTERNS => <<EOQ;
# Rework quote paragraphs
(<p><font><b>*</b></font></p>)                      ->   <p>(<b>*</b><br/>)</p>
# Remove cruft from comment paragraphs
<p><font>*</font></p>                               ->   <p>*</p>
# Remove paragraphs containing breaks
<p><br/>*</p>                                       ->
# Title
<p><font><font size="6"><b>*</b></font></font></p>  ->   <h1>*</h1>
# Subtitle
<h1>*</h1>                                          ->   <h2>*</h2>
# Remove font tags
<font>*</font>                                      ->   *
# Remove other span tags
<span>*</span>                                      ->   *
# Remove document styling
<style>*</style>                                    ->
# Remove metadata tags
<meta>                                              ->
EOQ

use constant TEMPLATE => <<EOQ;
<html>

share/clean.pl  view on Meta::CPAN

put in the output verbatim. Patterns can be grouped inside parentheses. The 
pattern will be copied as many times as were matched in the correpsonding set 
of parentheses in the match pattern.

The format is probably best explained by example:

    # Replace strong tags by bold
    <strong>*</strong> -> <b>*</b>
    # Replace center tags
    <center>*</center> -> <div class="centered">*</div>
    # Remove font tags
    <font>*</font> -> *
    # Remove style tag and its content (empty replacement)
    <style>*</style> ->
    # Replace div tags with p tags, keep class
    <div class=*>*</div> -> <p class=*>*</p>
    # Replace list with breaks
    <ul>(<li>*</li>)</ul> -> (*<br>)
    # Remove page numbering (empty replacement)
    <p>^\d+$</p> ->

=head1 LICENSE



( run in 1.501 second using v1.01-cache-2.11-cpan-5735350b133 )