You’re killing me, Smalls.

#!/usr/bin/perl
use strict;
use warnings;
use Mojolicious::Lite;

get "/" => sub {
    my $c = shift;
    $c->clock;
    $c->render("index");
};

helper clock => sub {
    my $clock = { clock => time };
    +shift->stash( $clock );
    $clock;
};

get "/clock" => sub {
    my $c = shift;
    $c->render(json => $c->clock);
};

app->start;

__DATA__
@@ index.html.ep
<!DOCTYPE html>
<html>
<head>
  <title>MojoClock</title>
  <script src="https://code.jquery.com/jquery-3.4.1.min.js"
          integrity="sha256-CSXorXvZcTkaix6Yvo6HppcZGetbYMGWSFlBw8HfCJ
+o="
          crossorigin="anonymous"></script>
  <style>* { font-family:"helvetica neue", helvetica }</style>
</head>
<body>
  <h1 class="clock">
     <%= $clock %>
  </h1>
  <script type="text/javascript">
    function clockMe() {
      $clock = $(".clock");
      $.ajax({ type: "GET"
              ,url: "clock"
              ,success: function(json){
                  $clock.fadeOut(10,function(){ $clock.text(json.clock
+).fadeIn() });
               }
              ,error: function(req,msg){
                   alert("Oh, noes! Errerz!!!");
               } });
    };
    setInterval(clockMe, 1000)
  </script>
</body>
</html>

[download]

I consider meta refresh an unambiguously worst UX practice except in the rare case of needing to do it *once* in a situation you want to present a message to the user before a real redirect or ensure a session timeout or something where JS is disabled… or pump up your page view stats for advertisers like certain broadsheet hacks who shall remain unnamed. :P

In reply to Re^2: Mojolicious refresh by Your Mother
in thread Mojolicious refresh by Anonymous Monk

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.