Mercurial > mercurial > hgweb_kaigo.hg.cgi

view qtuti/mkgo.pl @ 0:aaaa401818a1 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
first commit.
author pyon <pyon@macmini>
date Mon, 24 May 2021 21:32:58 +0900
parents
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;