my %hash = ();
my $filename = "input_text.txt";
open FILE,"<$filename" or die "Cannot read the file $filename: $!\n";

foreach <FILE> {
if (my $line =~ m/{$Hash_value{key}}/) {
       print "$line has $hash{$key} and value is $hash{key}\n";
    }
}