Mercurial > repo
view paste/paste.31992 @ 12493:885661512b17 draft
<int-e> le//rn schwartzian//In 1987, Yogurt introduced a better way to rank Schwartz users: Rather than holding an annual tournament, users would take a series of standardized tests adminstered by official Schwartz centers, and would then be ranked according to the results. This lead to the Schwartzian transform because it allowed many more users to be ranked.
author | HackEso <hackeso@esolangs.org> |
---|---|
date | Fri, 12 Jan 2024 07:24:55 +0000 |
parents | 61773ea4b7b2 |
children |
line wrap: on
line source
bin/?: else echo "$1? ¯\(°_o)/¯"; exit 1; bin/¿:? "$@" | rev | tac bin/؟:? "$@" | rev bin/anonlog: grep -P -i -- "$1" ????-??-??.txt | shuf -n 1| sed "s=<[^>]*> ==" bin/anonlog: file=$(shuf -en 1 ????-??-??.txt) bin/aseen:done < <(ls -r /var/irclogs/_esoteric/????-??-??.txt) bin/bienvenido:if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome.es"; } else { exec "bin/?", "welcome.es"; } bin/bseen:done < <(ls -r /var/irclogs/_esoteric/????-??-??.txt) bin/define: echo 'Define what?' bin/define: --dump --width=1000 'http://google.com/search?q=define:'"$QUERY" | Binary file bin/delvs matches bin/e:echo elieser224: ¿por qué con frecuencia altas y bajas? bin/ello: if (!(name != null ? name.length : void 0)) { bin/ello: console.log(consonant_then_o.test(name) ? name.replace(consonant_then_o, function(match, before, consonant, rest) { bin/ello: }) : ell_manglable.test(name) ? name.replace(ell_manglable, function(match, before, middle, rest) { bin/ello: }) : starts_with_o.test(name) ? 'hell' + name : ends_with_consonant_then_vowel.test(name) ? name.replace(ends_with_consonant_then_vowel, function(match, before) { bin/ello: }) : ends_with_consonant.test(name) ? name + 'ello' : "Hello, " + name + "!"); Binary file bin/emmental matches bin/etymology: echo 'Look up what?' bin/etymology: --dump --width=1000 'http://etymonline.com/?search='"$QUERY" | bin/forget:echo "Forget what?" Binary file bin/fortune matches Binary file bin/fueue matches bin/gaseen:arr=(/var/irclogs/_esoteric/????-??-??.txt) bin/gccrun:r=$? bin/google: echo 'Google what?' bin/google: --dump --width=1000 'http://google.com/search?q='"$QUERY" | bin/?h:? "$@" | perl -pe 's/([aeiouy])([bcdfghjklmnpqrstvxz])\b/$1h$2/ig' bin/hatesgeo:perl -n -e '/:(.*?)!.*JOIN/; $j{$1}++; END {print "$_ $j{$_};" for sort {$j{$b} <=> $j{$a}} keys %j}' $@ bin/?hh:\? "$@" | perl -pe 's/([aeiouy])([bcdfghjklmnpqrstvxz])/$1h$2/ig' bin/js:## <http://icedtea.classpath.org/bugzilla/show_bug.cgi?id=179> bin/js:## <http://www.openoffice.org/issues/show_bug.cgi?id=91641> bin/learn:topic=$(echo "$1" | lowercase | sed 's/^\(a\|the\) //;s/s\? .*//') bin/list:grep '^..:..:..: <[^>]*> `list' /var/irclogs/_esoteric/201[3-9]-??-??.txt | sed 's/^.*<//;s/>.*//;s/_*$//' | sort -u | tr '\n' ' ' bin/log: grep -P -i -- "$1" ????-??-??.txt | shuf -n 1 bin/log: file=$(shuf -en 1 ????-??-??.txt) Binary file bin/lua matches Binary file bin/luac matches bin/luarocks:package.path = [[/hackenv/share/lua/5.2//?.lua;/hackenv/share/lua/5.2//?/init.lua;]]..package.path bin/luarocks-admin:package.path = [[/hackenv/share/lua/5.2//?.lua;/hackenv/share/lua/5.2//?/init.lua;]]..package.path Binary file bin/macro matches Binary file bin/mov matches Binary file bin/node matches Binary file bin/nooodl: matches bin/pastelog: file=$(shuf -en 1 ????-??-??.txt) bin/pastelog: lines=$(timeout 25 grep -P -i -- "$1" ????-??-??.txt | head -n 301) bin/pastelogs: file=$(shuf -en 1 ????-??-??.txt) bin/pastelogs: lines=$(timeout 25 grep -P -i -- "$1" ????-??-??.txt | head -n 301) bin/pastlog:grep -P -i -- "$1" $(ls ????-??-??.txt | head -n -1) | shuf -n 1 bin/prefixes:echo 'Bot prefixes: fungot ^, HackEgo `, EgoBot !, lambdabot @ or ?, thutubot +, metasepia ~, jconn ) , blsqbot !' bin/quine:cd /var/irclogs/_esoteric; cat $(ls ????-??-??.txt | tail -1) | sed 's/[^>]*> //' | grep '^`' | tail -1 #Best cheating quine ever? bin/randomanonlog:awk 'sub(/^<[^:]+:[^ ]+ PRIVMSG #esoteric :/,"")' < `ls /var/irclogs/_esoteric/????-??-??-raw.txt | shuf -n1` | shuf -n1 Binary file bin/rot256 matches Binary file bin/searchlog matches bin/seen:($n,$e)=split /\s+/, join(" ",@ARGV); $n=~s/ *$//; $c="ls -r /var/irclogs/_esoteric/????-??-??.txt"; $c.=" | head -n 30" unless $e eq "ever"; @f=split /\s+/, `$c`; for $f (@f) { open F,"<$f"; @l=grep(/^..:..:..: <$n>/i,<F>); close F; if (@l) { $b=$f; $b=~s#.*/(.*?).txt#$1#; print "$b $l[-1]"; exit 1; } } print $e eq "ever" ? "not that I remember" : "not lately; try `seen $n ever"; bin/seens:find /var/irclogs/_esoteric -mindepth 1 -maxdepth 1 -type f -name '????-??-??.txt' | sort -r | xargs -d'\n' -r tac -- | grep "^..:..:..: <$1>" | head -n 1 bin/shove: ? @ARGV : <>; bin/shove:my $width = 0; $width = ($width < length $_ ? length $_ : $width) for @program; bin/shove: $cmd eq "'" and ($quotecount += ($lws ? -1 : 1)), ($lws = !$lws); bin/shove: $cmd eq '"' and ($quotecount += ($lws ? 1 : -1)), ($lws = !$lws); Binary file bin/tclkit matches bin/tell:echo "I think you mean \"@tell $@\" instead?" Binary file bin/units matches bin/welcome:if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? welcome"; } else { exec "bin/?", "welcome"; } bin/wercome:if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "bin/@", $_ . " ? wercome"; } else { exec "bin/?", "wercome"; } bin/wl: url = 'http://%s.wikipedia.org/w/api.php?format=json&action=query&' \ bin/word:my $parse_line = qr/(\d*)(?: +(\d+))?/;