{"type":"rich","height":"190","provider_name":"Hatena Blog","url":"https://hiroyukim.hatenablog.jp/entry/20070727/1185505107","provider_url":"https://hatena.blog","version":"1.0","categories":[],"blog_url":"https://hiroyukim.hatenablog.jp/","author_name":"hiroyukim","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fhiroyukim.hatenablog.jp%2Fentry%2F20070727%2F1185505107\" title=\" perl Text::Graph -  (\u30fd\u00b4\u03c9`)\u3000\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","image_url":null,"blog_title":" (\u30fd\u00b4\u03c9`)\u3000","title":" perl Text::Graph","description":"\u30c6\u30ad\u30b9\u30c8\u30b0\u30e9\u30d5\u3092\u751f\u6210\u3057\u3066\u304f\u308c\u308b\u541b\u3002 1 use strict; 2 use warnings; 3 4 use Text::Graph; 5 use Text::Graph::DataSet; 6 7 print Text::Graph->new('Bar')->to_string( { 1 =>10, 2 =>20 , 3 => 30 } ); \u3053\u3093\u306a\u304b\u3093\u3058\u3001\u5f15\u6570\u306fLine\u3082\u3042\u308b\u3002 1 : 2 :********** 3 :******************** \u3046\u3093\u3001\u307e\u3042\u697d\u3060\u3002http://search.cpan.org/~gwadej/Text-Graph-0.23/Graph.pm","width":"100%","published":"2007-07-27 11:58:27","author_url":"https://blog.hatena.ne.jp/hiroyukim/"}