- prepend 'v' to version vars
- do not show modification time, since it often sends the wrong message
to end-users
- link to repository at git.shiar.nl
use strict;
use warnings;
use strict;
use warnings;
sub import {
my $class = shift;
sub import {
my $class = shift;
no warnings 'uninitialized'; # save some useless checks for more legible code
use Carp;
no warnings 'uninitialized'; # save some useless checks for more legible code
use Carp;
my @casedesc = (undef, qw/shift ctrl meta/, 'shift meta');
my @rowdesc = qw(numeric top home bottom);
my @casedesc = (undef, qw/shift ctrl meta/, 'shift meta');
my @rowdesc = qw(numeric top home bottom);
use Shiar_Sheet::KeySigns qw(%sign); # dependant on $get{ascii}
use Shiar_Sheet::KeySigns qw(%sign); # dependant on $get{ascii}
$header{content_type} = "text/html; charset=$sign{charset}";
$header{content_type} = "text/html; charset=$sign{charset}";
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/vim
- <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/vim
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> <:= $sign{sep} :>
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat 'vim.inc.pl')[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
use warnings;
use open IO => ':utf8';
use warnings;
use open IO => ':utf8';
$header{content_type} = 'text/html; charset=utf-8';
$header{content_type} = 'text/html; charset=utf-8';
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/charset
- <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/charset
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> •
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat $ENV{SCRIPT_FILENAME})[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
no warnings 'qw'; # to quote or not to quote, that is the question
use open IO => ':utf8';
no warnings 'qw'; # to quote or not to quote, that is the question
use open IO => ':utf8';
$header{content_type} = 'text/html; charset=utf-8';
$header{content_type} = 'text/html; charset=utf-8';
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/digraphs
- <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/digraphs
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> •
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat 'digraphs.inc.pl')[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
use warnings;
use open IO => ':utf8';
use warnings;
use open IO => ':utf8';
$header{content_type} = 'text/plain; charset=us-ascii';
print '" vim digraph proposals <http://sheet.shiar.nl/digraphs>', "\n";
$header{content_type} = 'text/plain; charset=us-ascii';
print '" vim digraph proposals <http://sheet.shiar.nl/digraphs>', "\n";
use Shiar_Sheet::KeySigns qw(%sign);
use Shiar_Sheet::KeySigns qw(%sign);
$header{content_type} = "text/html; charset=$sign{charset}";
$header{content_type} = "text/html; charset=$sign{charset}";
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/nethack
- <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/nethack
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> <:= $sign{sep} :>
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat 'nethack.inc.pl')[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
no warnings 'qw'; # that's not a comment, it's a NUMBER SIGN
use open IO => ':utf8';
no warnings 'qw'; # that's not a comment, it's a NUMBER SIGN
use open IO => ':utf8';
$header{content_type} = 'text/html; charset=utf-8';
$header{content_type} = 'text/html; charset=utf-8';
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/unicode
- <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/unicode
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> •
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> •
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat $ENV{SCRIPT_FILENAME})[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
use Shiar_Sheet::KeySigns qw(%sign); # dependant on $get{ascii}
use Shiar_Sheet::KeySigns qw(%sign); # dependant on $get{ascii}
$header{content_type} = "text/html; charset=$sign{charset}";
$header{content_type} = "text/html; charset=$sign{charset}";
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/vim
- <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/vim
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> <:= $sign{sep} :>
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat 'vim.inc.pl')[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>
use Shiar_Sheet::KeySigns qw(%sign);
use Shiar_Sheet::KeySigns qw(%sign);
$header{content_type} = "text/html; charset=$sign{charset}";
$header{content_type} = "text/html; charset=$sign{charset}";
</div>
<p class="footer">
</div>
<p class="footer">
- <a href="http://sheet.shiar.nl/" rel="home">sheet.shiar.nl</a>/vimperator
- <a href="git://dev.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= "v$VERSION" :></a>
+ <a href="/" rel="home">sheet.shiar.nl</a>/vimperator
+ <a href="git://git.shiar.nl/sheet" rel="vcs-git" title="Git repository"><:= $VERSION :></a>
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
created by <a href="http://shiar.nl/" rel="author">Shiar</a> <:= $sign{sep} :>
<a title="Licensed under the GNU Affero General Public License, version 3" rel="copyright"
- href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a> <:= $sign{sep} :>
- last update <:
- use Time::Format qw(time_format);
- print time_format('yyyy-mm-dd', (stat 'vimperator.inc.pl')[9]);
- :>
+ href="http://www.fsf.org/licensing/licenses/agpl-3.0.html">AGPLv3</a>