my $filename = ('/tmp/A1/counters.conf'); 
open(my $fh, '<:encoding(UTF-8)', $filename)
  or die "Could not open file '$filename' $!";
my %values=();
my $t=time();
while (my $row = <$fh>) {
    chomp $row;
    my ($row1, $row2) = split /\s*=\s*/,$row;
    $values{$row1}=$row2;
}
while (my ($n,$m) = each %values) {
    if ($OID2-1==$n){
	my $var=$m*$t;
	$request->setValue(ASN_COUNTER,$var);	
    }
}