2014-06-27T13:38:55Z 76297 st0153 0 Online 53489 THD-Mexico 2.6 0 Online 76079 QAPLRScanner 0 Online ##

##

use XML::LibXML qw();
my $xml = XML::LibXML->load_xml(location => 'output.xml');
for ($xml->findnodes('//appliance_list_output[@status]')) {
	print $_->getAttribute('status') . "\n";
	#print $_->getElementsbyTagName('status') . "\n";
	print $_ . "\n";
}