view bin/@ @ 3642:ad0ef27932ab

<Roujo> mv bin/cat bin/catcat
author HackBot
date Wed, 04 Sep 2013 17:53:31 +0000
parents e037173e0012
children 5c5fc08f8113 1aa76501f9fe
line wrap: on
line source

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