批量修改 evolution 的通讯录的信息

[eexpress]

#!/usr/bin/perl
use BerkeleyDB;
$file="$ENV{HOME}/.evolution/addressbook/local/system/addressbook.db";
tie %hash, 'BerkeleyDB::Hash', -Filename => $file
or die "can't read file '$file': $!";
print map { $hash{$_}=~s/2971/1971/m,"*** $_ => $hash{$_}\n" if /pas-id/ } sort keys %hash;

也可以方便一些人。

[eexpress]

看到VCard是国家标准了。只好支持下BerkeleyDB的通讯录。

代码： 全选

● ai libberkeleydb-perl

[eexpress]

没evolution的，可以安装contacts建立通讯录。
导出成vcf文件也方便。稍微改下脚本就是。

[ChenFengyuan]

先占位......破铁通

[eexpress]

google到处的csv居然用GB2312。导出的vcf，标识不规范，glabels几乎不正确识别，不知道evolution认不。

[SmallV]