Mercurial > repo

view bin/card-by-name @ 8195:15385eb12db2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<oerjan> mkx bin/rnooodl//perl -pe \'s/(.)\\1\\1/"@{[$1 x(3+rand 7)]}"/ge\'
author HackBot
date Sun, 29 May 2016 00:46:18 +0000
parents 8bc55e6adaaf
children
line wrap: on
line source

#!/bin/sh
exec perl -e 'open$I,"<","/hackenv/share/mtg/allsets.txt"or die;$/=""; while(<$I>){/\A(?i)\Q$ARGV[0]/ and print}' "$1"