[Perl]GraphViz - 数据结构可视化

头像
PerlMonk
渐入佳境
渐入佳境
帖子: 51
注册时间: 2016年09月19日 10:20
拥有现金: 锁定
Has thanked: 4 times
Been thanked: 3 times
联系:

[Perl]GraphViz - 数据结构可视化

帖子 #1 PerlMonk » 2017年06月29日 19:07

编辑: 523066680@163.com
网站: Code-by.Org
2017-06-29

相关链接安装
    GraphViz-2.24.tgz 解压,进入目录:
    >perl Makefile.PL
    Please install Graphviz from http://www.graphviz.org/

    官网下载 graphviz-2.38.zip
    将其中的目录释放/合并到 Strawberry Perl安装目录的c目录下(eg. C:\Strawberry\c)

    重新尝试:
    > perl Makefile.PL
    Checking if your kit is complete...
    Looks good
    Warning: prerequisite XML::XPath 1.13 not found.
    Generating a dmake-style Makefile
    Writing Makefile for GraphViz
    Writing MYMETA.yml and MYMETA.json

    > dmake
    > dmake install

    无误后运行示例代码(稍作修改)

    use GraphViz;
    my $g = GraphViz->new();

    $g->add_node('London');
    $g->add_node('Paris', label => 'City of\nlurve');
    $g->add_node('New York');

    $g->add_edge('London' => 'Paris');
    $g->add_edge('London' => 'New York', label => 'Far');
    $g->add_edge('Paris' => 'London');

    $g->as_png("simple.png");


    图片
[Finished in 0.3s]

头像
PerlMonk
渐入佳境
渐入佳境
帖子: 51
注册时间: 2016年09月19日 10:20
拥有现金: 锁定
Has thanked: 4 times
Been thanked: 3 times
联系:

Perl GraphViz 设置中文字体(微软雅黑)

帖子 #2 PerlMonk » 2017年06月30日 12:45

Code: [全选] [展开/收缩] [Download] (Untitled.pl)
  1. use utf8;
  2. use Encode;
  3. use GraphViz;
  4.  
  5. my $g = GraphViz->new();
  6.  
  7. $g->add_node('London');
  8. $g->add_node('Paris', label => encode('utf8', '城市'), fontname=>"Microsoft YaHei", fontsize=>12) ;
  9. $g->add_node('New York');
  10.  
  11. $g->add_edge('London' => 'Paris');
  12. $g->add_edge('London' => 'New York', label => 'Far');
  13. $g->add_edge('Paris' => 'London');
  14.  
  15. $g->as_png("simpleCN.png");


回到 “模块”

在线用户

用户浏览此论坛: 没有注册用户 和 0 访客