Hello there,

Once again I'm at it with some perl stuff . I have a simple question I think (which I can't figure...argh) is easy. I have a file called crap.txt that consists of:

lisa
bart
homer

My script is:
----------------------------------------------
#!/usr/bin/perl

$file="/home/crap.txt";
open (FILE, $file) || die "Cannot open file $file: $!\n";

@array=<FILE>;
print "Contents of $file is: \n@array\n";
----------------------------------------------

However, it prints like so:
lisa
bart
homer

As you can see, there is an extra space for bart and homer but not for lisa. How do I eliminate this space and why does this occur? Thanks!

-twantrd

Looks ok there. Where are the extra spaces? Try using code tags around the code+output to make it clearer?

Oh crap, it formatted the text differently. Sorry, the output looks like this:

lisa
<1 spacebar>bart
<1 spacebar>homer

Hope that makes it understandable for you guys....let me know if I need to be more clearer. Thanks!

-twantrd

Ok, got it. The default in Perl if you print an entire array in one step, is to put spaces between each element, otherwise (for example) if you print the array (1,2,3,4,5,6), you'd get
123456 , prob not what you'd want...
If you loop through the array instead, you'll be fine.

That did it. Thanks

-twantrd