# Display RexExp results
print STDERR join("\t",@arguments),"\n";

<here add all data from @argumens to a DB (as described in the original post)>

# check if data parsed successfully
my $sql2 = 'SELECT *
	FROM hist_mod_score
	WHERE Counts=?';
	$sth = $dbh->prepare($sql2) or die $dbh->errstr;
	$sth->execute($index) or die $sth->errstr;

# dump fetched query results	    
	$sth->dump_results if $sth->{NUM_OF_FIELDS};