view bin/scheme @ 11273:819296960fe6

<oerjan> slwd `revert//s,http.*bot,https://hackego.esolangs.org,
author HackBot
date Sat, 16 Dec 2017 20:29:48 +0000
parents 03ab1a0909e2
children e9fea593e702
line wrap: on
line source

#!/bin/sh
exec perl '-ne/Scheme$/&&push@p,$p;$p=$_}{print$p[rand@p]' share/mtg/allsets.txt