#!/usr/bin/perl

use warnings;
use strict;
use LWP::Simple;
use XML::LibXML;

my $url = 'http://192.168.1.8/xmlfeed.rb';
my $parser = XML::LibXML->new;
my $doc = $parser->parse_file($url);
my @temp = $doc->getElementsByTagName('currentReading');

foreach(@temp){
    my $temp = $_->to_literal;
    my $math = $temp + 5;
    print $math;
}