use File::Slurp;
my $f1 = read_file('Input1');
my $f2 = read_file('Input2');
if ($f1 eq $f2) {
      print"Both File are Equal";
}else{
      print"Not-Equal";
}
[download]

'==' is a number comparision operator, and its wrong to compare content with it, you must use 'eq' in this case.