Mercurial > mercurial > hgweb_kaigo.hg.cgi

view qtuti/mkgo.pl @ 3:bbeb834023e3 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
not use ioutil.
author pyon <pyon@macmini>
date Sun, 06 Jun 2021 08:44:28 +0900
parents aaaa401818a1
children
line wrap: on
line source

use utf8;

open my $f, '<', $ARGV[1];
my $cpp = do{local $/; <$f>};
close $f;

open $f, '<', $ARGV[0];
while (<$f>) {
	s/##### C_SOURCE #####/$cpp/;
	print;
}
close $f;