my @parts = split( "Hello World" ); # generates warning
print "Parts: " . scalar(@parts) . "\n"; # prints "Parts: 0"

for( @parts ){ # never enters this loop since the array is empty
    print "$_\n";
}