Re^2: putting text into array word by word

I have tried your code, and although I get no syntax errors, it does not print the array

using the following code

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

open(FILE,"<input.txt");

print "file loaded \n";

my @lines=<FILE>;
my @temp_arr;
close(FILE);
my @all_words;
foreach my $line(@lines) {

@temp_arr=split('\s',$line);
push(@all_words,@temp_arr);
}
print "@all_words\n";
[download]

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 ansh batra (Friar) on Jan 09, 2012 at 18:39 UTC
check your file from which you are taking the input. since you used +> parameter earlier , perl have deleted its contents.	[reply]
Re^4: putting text into array word by word by jms53 (Monk) on Jan 09, 2012 at 18:55 UTC
PERFECT, Thank you sooo much I can now go back to calmly pseudo-geeking.	[reply]
Re^5: putting text into array word by word by Not_a_Number (Prior) on Jan 09, 2012 at 20:11 UTC
OK, now that's solved, let's look at the definition of 'word' (yes, things are going to get hairy...). Take this sentence, for example: "No, he said." The 'words' that your current code would extract are: `"No, he said."` [download] Is that really what you want? Or would you prefer: `No # or, better, 'no' he said` [download] ?	[reply] [d/l] [select]
Re^6: putting text into array word by word by jms53 (Monk) on Jan 09, 2012 at 23:19 UTC
Re^7: putting text into array word by word by Not_a_Number (Prior) on Jan 10, 2012 at 10:35 UTC
Some notes below your chosen depth have not been shown here


Problems? Is your data what you think it is?
	PerlMonks