use feature qw/say/;

...

my $info = "out.txt";
open my $out, ">", $info or die "Cannot open file for writing: $!";

say $out "Key: $_ and Value: $functions{$_}" foreach (sort { $functions{$a} cmp $functions{$b} } keys %functions);

close $out or die "Cannot close file: $!";