Help for this page
{ local $/ = undef; ... if ( $wholetext =~ /\b$searchword\b/ ) { # do something }
open( FILE, $filename ) or die "yadda yadda"; @data = <FILE>; if ( grep /\b$searchword\b/, @data ) { # do something; }