Mercurial > repo

annotate bin/welkom @ 12508:335a2a849232 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<wib_jonas> `` f=/hackenv/bin/dateu; >$f echo $\'#!/bin/bash\\nset -e\\nif (( 1 < $# )); then echo "dateu error: too many command-line arguments. Usage: dateu datetimestring"; exit 2; fi\\nexec date -u ${1:+-d "$1"} "+%Y-%m-%d %H:%M:%S.%3N %z %Z %B %-e %A %G-W%V-%u"\'; chmod a+x "$f"
author HackEso <hackeso@esolangs.org>
date Wed, 03 Jul 2024 18:15:24 +0100
parents ceb43c4d37de
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
9745
cc187ca416d5 <wob_jonas> `` x=bin/welkom; >$x sed s/\\.fr/\\.nl/g bin/bienvenue && chmod -v +x "$x"
HackBot
parents:
diff changeset
1 #!/usr/bin/perl -w
12092
ceb43c4d37de <fizzie> ` for w in benvenuto bienvenido bienvenue bonvenon tervetuloa v\xc3\xa4lkommen velkomin velkommen welcome welkom wercome willkommen \xd0\xb4\xd0\xbe\xd0\xb1\xd1\x80\xd0\xbe-\xd0\xbf\xd0\xbe\xd0\xb6\xd0\xb0\xd0\xbb\xd0\xbe\xd0\xb2\xd0\xb0\xd1\x82\xd1\x8c; do sed -i -e \'2s|^|my $bin = $ENV{"HACKENV"}."/bin"; |;s|bin/[@?]|$&|g\' /hackenv/bin/$w; done
HackEso <hackeso@esolangs.org>
parents: 12091
diff changeset
2 my $bin = $ENV{"HACKENV"}."/bin"; if (defined($_=shift)) { s/ *$//; s/ +/ @ /g; exec "$bin/@", $_ . " ? welcome.nl"; } else { exec "$bin/?", "welcome.nl"; }