perl -pe '$chnk = "chunk01" if 1 == $.; open (STDOUT, ">", $ARGV . "." .  $chnk++) unless ($. - 1) % 10_000; close ARGV if eof' big_file_one big_file_two