changeset 12042:1aa76501f9fe draft

<oerjan> sled bin/@//2s!+.*!+//) { print "$1: "; exec "nur", $_; }!
author HackEso <hackeso@esolangs.org>
date Sat, 16 Nov 2019 04:05:51 +0000
parents 142d349827b7
children 68ed7dfb8cb6
files bin/@
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/bin/@	Fri Nov 15 14:46:14 2019 +0000
+++ b/bin/@	Sat Nov 16 04:05:51 2019 +0000
@@ -1,2 +1,2 @@
 #!/usr/bin/perl -w
-$_ = join " ", @ARGV; if (s/^([^ ]*) +([^ ]*) +//) { print "$1: "; exec $2, $_; }
+$_ = join " ", @ARGV; if (s/^([^ ]*) +//) { print "$1: "; exec "nur", $_; }