use XML::Simple; my $simple = XML::Simple -> new (); my $tree = $simple->XMLin($xmlfile); @values = split ',', $tree->{report}{node}{values}; @time = split ',', $tree->{report}{node}{time};