#!perl $m=pop;for$"(pop..$m){$_="@ARGV";-e||warn"$_\n"}