view bin/unh @ 12259:5d86806a2603 draft

<int-e> mkx ../bin/"//\\`^ 2 "quote${1:+ }$1"
author HackEso <hackeso@esolangs.org>
date Sat, 07 Dec 2019 23:54:29 +0000
parents eee02eb985e4
children
line wrap: on
line source

#!/usr/bin/perl -p
s/([aeiouy])h([bcdfghjklmnpqrstvxz])/$1$2/ig