use strict;
use warnings;

##</code><code>##

for (@myarray1) { last if $conf eq $_; $i++; };

##</code><code>##

print "Values is @values \n";

##</code><code>##

0|0|{A=145,B=2,C=12,D=18}|!

##</code><code>##

Conf is 0
Rest is 0