my @interesting = ();
while(<DATA>) {
    chomp;
    push @interesting, $1 if m/^(?:attribute|value): (.*)$/;
}
my %attributes = @interesting; # magic