perl -e 'for (@ARGV){open FILE, ">>$_";print FILE "\n";close FILE;} '