This is the revision history for mbti in <matrix.org:#rAnyijhRxzFRfdjSHl:matrix.org>

factoid_idsubjectcopulapredicateauthornamespace
15955 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; my $t=substr md5_hex($n),1,1; (qw/istj isfj infj intj istp isfp infp intp estp esfp enfp entp estj esfj enfj entj/)[oct "0x$t"];!
istj
simcop2387 <*:##NULL>
15954 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; my $t=substr md5_hex($n),1,1; (qw/istj isfj infj intj istp isfp infp intp estp esfp enfp entp estj esfj enfj entj/)[ord "0x$t"]; [$t, "0x$t", oct "0x$t"]!
Useless use of list slice in void context at (IRC) line 1. [3,"0x3",3]
simcop2387 <*:##NULL>
15953 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; my $t=substr md5_hex($n),1,1; (qw/istj isfj infj intj istp isfp infp intp estp esfp enfp entp estj esfj enfj entj/)[ord "0x$t"]; [$t, "0x$t", ord "0x$t"]!
Useless use of list slice in void context at (IRC) line 1. [3,"0x3",48]
simcop2387 <*:##NULL>
15952 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; my $t=substr md5_hex($n),1,1; (qw/istj isfj infj intj istp isfp infp intp estp esfp enfp entp estj esfj enfj entj/)[ord "0x$t"]!
No output.
simcop2387 <*:##NULL>
15951 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; my $t=substr md5_hex($n),1,1; (qw/istj isfj infj intj istp isfp infp intp estp esfp enfp entp estj esfj enfj entj/)[$t]!
Argument "b" isn't numeric in list slice at (IRC) line 1. istj
simcop2387 <*:##NULL>
15950 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; my $t=substr md5_hex($n),1,1; (qw/istj isfj infj intj istp isfp infp intp estp esfp enfp entp estj esfj enfj entj/)[$t]!
intj
simcop2387 <*:##NULL>
15949 mbti is `eval my ($n)=qw/`arg! `arg &n!/; use Digest::MD5 qw/md5_hex/; substr md5_hex($n),1,1;!
3
simcop2387 <*:##NULL>
15948 mbti is `eval my ($n)=qw/`arg! `arg &n!/; $n!
simcop2387
simcop2387 <*:##NULL>