else {$outfile = $1; open(OF, ">$outfile")