Ovid

Keybase proof

I hereby claim:

• I am ovid on github.
• I am ovidperl (https://keybase.io/ovidperl) on keybase.
• I have a public key ASDsbYunRavQwS2b6ZR7TER9LwNC4YtX7oDIqaGPu6URwAo

To claim this, I am signing this object:

Ovid

# Turns out this doesn't work because OrderedHash
# is sorted, not ordered
class Cache::LRU {
    use OrderedHash;
    has %.cache = {} does OrderedHash;
    has UInt $.max_size = 20;

    method get($key) {
        return %.cache{$key};
    }

Ovid

#!/usr/bin/env perl

# This program constantly prints the time in GCT (Galactic Coordinated Time)
# as used in the MMORPG Tau Station (https://taustation.space/)
# Obviously, we use something a bit more sophisticated than this :)

use strict;
use warnings;
use Time::HiRes 'sleep';
$|++;    # unbuffer STDOUT

Ovid

#!/bin/bash

# vim: filetype=sh

set -e   # exit if any command fails

prog=$(basename $0)
branch=$(git rev-parse --abbrev-ref HEAD)
need_to_stash=$(git status --porcelain -uno)

Ovid

#!/usr/bin/env perl

use 5.18.0;
use warnings;
use autodie ":all";
use LWP::UserAgent;
use HTTP::Request::Common;
use HTML::TokeParser::Simple;

my $login_url = 'https://www.livejournal.com/login.bml?ret=1';

Ovid

package Ovids::Debugger;

# vim: syntax=perl

=head1 NAME

.perldb - Customize your Perl debugger

=head1 USAGE

Ovid

#!/usr/bin/env perl

use Modern::Perl;
use Net::Twitter;
use Config::Tiny;
use File::HomeDir;
use utf8::all;
use Text::Wrap;
use Term::ANSIColor;
use autodie ':all';

Ovid

package main

import (
        "io"
        "os"
        "strings"
)

type rot13Reader struct {
        reader io.Reader

Ovid

package main

// newton's method for calculating square roots

import (
	"fmt"
	"math"
)

func Sqrt(x float64) float64 {

Ovid

#!/usr/bin/env perl

use 5.24.0;
use warnings;
use Term::ANSIColor;
chomp( my @branches
      = qx/git show -s --pretty='%cn|%ci %D' \$(git rev-parse --branches --remotes)/
);

my %branches_for;