foreach my $re(@results){                            
next if $re =~/^AVUs defined/; 
warn $re; 
my $attribute= $1 if($re =~ /^attribute:\s+(.*)/);                                             
my $value = $1 if($re =~ /^value: (.*)/);                                                       |  warn $attribute,$value;    

##</code><code>##

attribute: md5

EVAL_ERROR: Use of uninitialized value $value in warn at Access.pl line 125.

A problem occurred at /nfs/users/nfs_a/aj6/CGP/Fluidigm/perl/scripts/LoadGenotypingResults.pl line 61.