windows下，分析svn日志提取变更

最新推荐文章于 2024-05-01 11:00:00 发布

Huppert

最新推荐文章于 2024-05-01 11:00:00 发布

阅读量1.9k

点赞数

文章标签： svn perl

本文链接：https://blog.csdn.net/whhlpo/article/details/74171946

版权

本文介绍了如何在Windows环境下利用Subversion命令行工具和Perl脚本`svn_log_extract.pl`分析SVN日志，提取出文件的删除、修改和添加信息，并将这些变更移到新的文件夹中，以辅助版本更新操作。

摘要由CSDN通过智能技术生成

通过分析svn的日志，提取删除，变更，添加，并把这些变化放置到新的文件夹中。主要用途为版本更新

需要使用的工具 Subversion 命令行工具，下载地址：http://subversion.apache.org/

perl脚本 svn_log_extract.pl 代码如下：

use strict;
use warnings;
use File::Basename;
use File::Path;
use File::Copy;

my $usage = "usage: in_file result_file del_file match_pre src_pre dst_pre missing_file";
#default recipe dirs


if(scalar(@ARGV) < 7) {print STDERR $usage; exit 1;}

my $in_file = shift @ARGV;
my $result_file = shift @ARGV;
my $del_file = shift @ARGV;
my $match_pre = shift @ARGV;
my $src_pre = shift @ARGV;
my $dst_pre = shift @ARGV;
my $missing_file = shift @ARGV;

open(IN, "<", $in_file) or die $!;
my @file_content = <IN>;
close IN;

#合并变更
my %result=();
{
	foreach my