hello world.
This is a backslash: \
Here are 10 of them: \\\\\\\\\\

##</code><code>##

#! /usr/bin/perl -w
use strict;

my $file = "raw_text";
open(FILE, "< $file") or die "Cannot open '$file': $!";
my $contents = join '', <FILE>;
print "HERE ARE THE CONTENTS OF $file:\n";
print $contents;

##</code><code>##

HERE ARE THE CONTENTS OF raw_text:
hello world.
This is a backslash: \
Here are 10 of them: \\\\\\\\\\