view bin/@ @ 5465:d2fdb9c12e32

<oerjan> undo 5464
author HackBot
date Sun, 07 Jun 2015 16:47:56 +0000
parents 1e110f9d6e37
children
line wrap: on
line source

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