view bin/@ @ 10257:b727e7b800f7

<oerjan> sled bin/?//4,$s/topic1/topic2/;9ielif [ -e "$topic1" ];
author HackBot
date Wed, 15 Feb 2017 01:20:42 +0000
parents e037173e0012
children 5c5fc08f8113 1aa76501f9fe
line wrap: on
line source

#!/usr/bin/perl -w
$_ = join " ", @ARGV; if (s/^([^ ]*) +([^ ]*) +//) { print "$1: "; exec $2, $_; }