#!/usr/bin/perl
use 5.014;
# 1007352

# error here:	$word = split "", $lines;

my $lines = "foo bar baz bat read the docs; they're often helpful.";

my @word = split " ", $lines;  # $word replaced with @word; "" replaced with " "

my $word;
for $word( @word) {
    say $word;
}