#!/usr/bin/perl --
# Automatically use-s strict/warnings/utf8 and feature :5.10
use Mojolicious::Lite;

sub mojo_index {
    my( $self ) = @_;
    my $time = time;
    my @three = ( 1..3 );
    return $self->render( title => "Mojo $time", thumbs => \@three );
}



## map paths to subroutines
###
#~ route named 'index', render's template index.html.ep if html is acc
+epted
get '/' => \&mojo_index => 'index';;;
#~ https://localhost:3000/index
#~ https://localhost:3000/index.html
#~ https://localhost:3000/index.txt
get '/index' => sub { shift->render( title => "Mojo \$time" , thumbs =
+> [ 6,6,6] ) };
helper thumbs => sub { [ 9,9,9 ] };
helper thumbstring => sub { join ' ', @{[ 9,9,9 ]} };

# Start the Mojolicious command system _aka_ shagadelic('daemon'); 
app->start;

#~ https://metacpan.org/pod/Mojolicious::Plugin::DefaultHelpers#includ
+e
__DATA__
@@ thumbs.html.ep
<b> I am thumbs.html.ep </b>
<dl>
    <dt> $thumbs  <dd> <%= $thumbs =%>
    <dt> @$thumbs <dd> <%= join ' ', @$thumbs =%>
    <dt> thumbs() <dd> <%= join ' ', thumbs(); =%>
    <dt> @{thumbs()} <dd> <%= join ' ', @{thumbs()}; =%>
    <dt> thumbstring() <dd> <%= thumbstring =%>
</dl>

@@ index.txt.ep
If you ask for text you will get text its <%= title %>

@@ index.html.ep
<html>
    <head>
        <title><%= title =%></title>
        <meta charset="utf-8" /></meta>
    </head>
    <body>
        <h1><%= title =%></h1>
        <dl>
            <dt> $thumbs  <dd> <%= $thumbs =%>
            <dt> @$thumbs <dd> <%= join ' ', @$thumbs =%>
            <dt> thumbs() <dd> <%= join ' ', thumbs(); =%>
            <dt> @{thumbs()} <dd> <%= join ' ', @{thumbs()}; =%>
            <dt> thumbstring() <dd> <%= thumbstring =%>
        </dl>
        <hr>
        <div> <%= include 'thumbs' =%> </div>
    </body>
</html>

[download]

In reply to Re^2: Mojolicious, layouts and content generating. by Anonymous Monk
in thread Mojolicious, layouts and content generating. by Kyshtynbai

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.