if ($modified eq $string) {
    print "the file is the same\n";
}