メメメモモ

プログラミング、筋トレ、ゲーム、etc

XML,JSON,YAMLを読み込んでperlのデータ構造に変換

XML,JSON,YAMLを読み込む処理のメモ。
一般的にどのモジュールを使えばいいのかよく分かりませんでした。

XML::Simpleを用いてXMLを読み込む

use strict;
use warnings;

use XML::Simple;
use Data::Dumper;


my $xml = '';

my $parser = XML::Simple->new;
my $data = $parser->XMLin($xml);

# print Data::Dumper->Dumper($data);   

YAML::Tinyを用いてYAMLを読み込む

use strict;
use warnings;

use YAML::Tiny;
use Data::Dumper;


my $file = $ARGV[0];
my ($data) = YAML::Tiny::LoadFile($file);
# print Data::Dumper->Dumper($data);

JSONを用いてJSONを読み込む

use strict;
use warnings;

use JSON;
use Data::Dumper;

my $json = '{ "a":"1", "b":"2" }';
my $data = decode_json($json);

# print Data::Dumper->Dumper($data);