String eval does the trick.

my $m = 'Hello\nWorld';
print eval "qq($m)";
[download]

That solved my issue, thanks a lot.

Be careful! If the input is untrusted, that snippet could execute arbitrary code. (Consider my $m = '); arbitrary perl command here';) Be sure to place big red arrows in your comments.

String::Interpolate might be safer.

String eval does the trick.

In addition to the other solutions that avoid string eval and its inherent risks, there's YAML::Syck::Load although that's probably an overkill:

print Load '--- "Hello\nWorld\n"';
[download]

#!/usr/bin/perl
use strict;
use warnings;

my $msg = 'Hello\nWorld';
print "Msg was $msg\n";
$msg =~ s/\\n/\n/g;
print "Msg is $msg\n";
[download]

fpondemer, Welcome to the Monastery! Make yourself at home.

change

my $Message = 'Hello\nWorld';

into

my $Message = "Hello\nWorld";

and check now. Only double quotes ll interpolate not single quote which you have given as input. Also take a look at perldata

update: Oops! sorry, misunderstood the question. davorg++ thanks.

You're misunderstanding the question. The string is being read from a file. Try working with this:

#!/usr/bin/perl

use strict;
use warnings;

my $message = <DATA>;

# ... some code goes here

print $message;
__END__
Hello\nWorld
[download]

Putting the string in single quotes simulates the action of reading the data from a file.

--
<http://dave.org.uk>

"The first rule of Perl club is you do not talk about Perl club."
-- Chip Salzenberg