hi,
i've read and reread "learning perl"'s explanation of the join
function but i still can't get join to do what i want. i have a file which
has one word on each line but some lines have more than one word on a line
and are seperated by a space. i want to join all the words together so that the
words are not all on a seperate lines, but following one after the other
seperated by space. the following is the code i have which for some reason
adds a space before each word and does not join the words using a space a
glue.
==================================================================
#!/usr/bin/perl
#use strict;
open (NAMES, "names.txt")||die "can't open names.txt $!";
@names = <NAMES>;
foreach $line (@names){
$result = join("", @boaz);
print $result;
}
==================================================================
any help would be greatly appreciated. thanks
--
- josh
N8MSO
20A8 2FC6 9099 D215 78F4 D005 B9F3 21C4 300C C25E ~. .~ Tk Open Systems
=}------------------------------------------------ooO--U--Ooo------------{=
- [EMAIL PROTECTED] - tel: +972.58.520.636, http://www.tkos.co.il
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
