$_ = q| 
abc:
  asdf1
  asdf2

def:
  asdf3

ghi:
  asdf4
  asdf5
|;

local $/ = "";          # or $/ = "\n\n";
open IN, '<', \$_ or warn "opening \$_ failed";

my $n; $n .= $_ for <IN>;

print "exact" if $n eq $_;