use strict;
use warnings;

our $TEXTFILE="/some/path/file.ext";
open(TEXTFILE) || die "Failed to open $TEXTFILE:$!";

local $/;
my $text=<TEXTFILE>; # Slurp the whole file into one string

print "Matched!" if $text=~/match/;

##</code><code>##

perldoc perlretut
perldoc perlopentut
perldoc perlre
perldoc perlop
perldoc perlvar