foreach my $hash_ref2 (@result2) {
                               my $comment = $hash_ref2->{'comment'};
                               if ($comment =~ /^this is an automatic comment/) {
                                       last;
                                       my $done = "1";
                               }
                       }
print $done;