Select Code to Download

use strict;
use warnings;

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

print "Values is @values \n";

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

Conf is 0
Rest is 0