my @lines = $path_to_file->slurp;

##</code><code>##

my $guts  = $path_to_file->slurp;
my @lines = split /\n/, $guts;

##</code><code>##

my $guts  = $path_to_file->slurp;
my @lines = split /^/, $guts;