view bin/@ @ 4492:02775a0b8839

<ion> sed -i -re \'s/echo ("?)\\$[@*]\\1 /print_args_or_input "$@" /g\' bin/complain bin/ord bin/ordu
author HackBot
date Sat, 22 Feb 2014 02:38:07 +0000
parents 1e110f9d6e37
children
line wrap: on
line source

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