my $value = $1 if($re =~ /^value: (.*)/);                                                       |  warn $attribute,$value;