#!/usr/bin/perl

use strict;
use warnings;
use Web::Scraper;

my $html = q~<TR>
<TD align=right><INPUT type=checkbox CHECKED
value="1894.252474 from(948.133513,2+) title(Elution%20from%3a%20777FinneganScanNumber%3a%202607) query(520)"
name=QUE></TD>
<TD alig=right><TT><I><B>948.13&nbsp;&nbsp;</B></I></TT></TD> <TD align=right><TT><I><B>1894.25247&nbsp;&nbsp;</B></I></TT></TD>
<TD>23334455&nbsp;</TD>
<TD>&nbsp;</TD></TD></TR>~;

my $parser      = scraper {
    process 'input[type="checkbox"]', value => '@value';
};
my $result = $parser->scrape( $html );

print $result->{value};