å¼ãç¶ã LTSV ã«ã¤ãã¦ãText::LTSV ã¯ãã£ã¦ããã¨ã¯åã«ã¿ãã® split ã§ãããããªãã®ã ãã©ããã£ããä½ã£ããã ãä½ãå©ç¨æ¹æ³ã¯ãªãããªã¨èããã LTSV ã®ãã°ã¯æ¬ ç¹ããã£ã¦ãã®ã¾ã¾ã§ã¯è¦ã¥ãããã¨ã Text::LTSV ã§ããã·ã¥ã«ãªãã®ã ãããYAML ã¨ãã§åºåãããã©ããªãã試ãã¦ã¿ãããããã«ãYAML ã«è²ã¥ããã YAML::Tiny::Color ã¨ããã®ããã£ããã #!/usr/bin/env perl use strict; use warnings; use Project::Libs; use YAML::Tiny::Color qw/Dump/; use Text::LTSV; while (<>) { my $hash = Text::LTSV->parse_line($_); print Dump $hash; } ãããªã¹ã¯ãªã
{{#tags}}- {{label}}
{{/tags}}