#!/usr/bin/perl
$soglia=34567;
$file='/var/prova.html';
open(in, "<$file") or die "Non è possibile aprire il file";
while(<in> ){
$value="$1" if /<([0-9.]*)>/; #il valore da recuperare è del tipo: < 345.4 >
}
close(in);
if ($value>$soglia){
print="valore oltre la soglia\n"
} else {
print="valore sotto la soglia\n"
}

errore:
Can't modify print in scalar assignment at /root/JQ.pl line 11, near "}"
Execution of /root/JQ.pl aborted due to compilation errors.