Re^2: putting text into array word by word

in reply to Re: putting text into array word by word
in thread putting text into array word by word

Here is my full code:

#! /usr/bin/perl -w
use strict;


my $i = 0;
my $element;
my @words;
my @all_words
open FILE, "<", "input.txt" or die $!;
print "file loaded \n";
while (<FILE>) 
    {
    # the words from *this* line
    @words = split('', $_);
    push @all_words, @words; 
    }
    print "table loaded \n";

foreach $element (@words)
{

print "$element";


}
[download]

the "file loaded" and "table loaded" messages appear, however the elements are not printed afterwards

Comment on Re^2: putting text into array word by word Download Code

Replies are listed 'Best First'.
Re^3: putting text into array word by word by Eliya (Vicar) on Jan 09, 2012 at 18:44 UTC
You also probably want `split(' ', $_);` (to split on whitespace), not `split('', $_);`. Or simply `split;` (which has the same effect). BTW, your `</code >` tag doesn't work, because you have a space in between the angle bracket and the tag name...	[reply] [d/l] [select]
Re^3: putting text into array word by word by roboticus (Chancellor) on Jan 09, 2012 at 18:35 UTC
jms53: Try printing from `@all_words` instead of `@words`. Update: s/allwords/all_words/, added code tags. ...roboticus When your only tool is a hammer, all problems look like your thumb.	[reply] [d/l] [select]

In Section Seekers of Perl Wisdom