index.plp

   1 <(common.inc.plp)><:
   2
   3 Html({
   4         title => 'cheat sheets',
   5         version => 'v1.4',
   6         description => [
   7                 "Cheat sheets summarising various software programs and standards.",
   8         ],
   9         keywords => [qw'
  10                 sheet cheat reference software overview summary help keyboard map unicode
  11         '],
  12         stylesheet => [qw'light dark red'],
  13 });
  14
  15 :>
  16 <h1>Shiar's cheat sheets</h1>
  17
  18 <p>
  19 Through the miracle of formatting, design, abbreviation, compression, and Perl,
  20 the following topics have been condensed into single pages of reference.
  21 <br>
  22 Originally created by Mischa <span style="font-variant:small-caps">Poslawsky</span>,
  23 but you're free to use, print, alter, and redistribute under the AGPL license.
  24 </p>
  25
  26 <div class="section">
  27 <h2>Keyboard maps</h2>
  28 <ul>
  29 <li><a href="/readline">readline</a>
  30 <li><a href="/less">less</a>
  31 <li><a href="/vi">vi/vim</a>
  32 <li><a href="/vimperator">vimperator</a>
  33 <li><a href="/mutt">mutt</a>
  34 <li><a href="/nethack">nethack</a>
  35 <li><a href="/mplayer">mplayer</a>
  36 </ul>
  37 </div>
  38
  39 <div class="section">
  40 <h2>Unicode characters</h2>
  41 <ul>
  42 <li><a href="/charset">charsets</a>
  43 <li><a href="/unicode">common glyphs</a>
  44 <li><a href="/digraphs">digraphs</a>
  45 <li><a href="/writing">script comparison</a>
  46 </ul>
  47 </div>
  48
  49 <div class="section">
  50 <h2>Other references</h2>
  51 <ul>
  52 <li><a href="/browser">browser support</a>
  53 <li><a href="/countries">country codes</a>
  54 <li><a href="/termcol">terminal colours</a>
  55 <li><a href="/emoji">emoticons</a>
  56 </ul>
  57 </div>
  58
  59 <:
  60 if (open my $log, '-|', 'git log -20 --since=2\ week\ ago --pretty=%ai%x00%s%x00%h') {
  61         print "<h1>Recent updates</h1>\n\n";
  62         print "<dl>\n";
  63         while (readline $log) {
  64                 chomp;
  65                 my ($date, $subject, $commit) = split /\0/, $_;
  66                 $date =~ s{( .+)}{<small>$1</small>};
  67                 printf '<dt>%s</dt><dd>%s</dd>'."\n", $date, $subject;
  68         }
  69         print "</dl>\n\n";
  70 }
  71