in reply to Space prepended to Array Print

Hi JockoHelios,
You have been accurately answered. But if you wouldn't mind a little illustration using some code snippets: 

use warnings;
use strict;


  my @array = map{$_}<DATA>;

   print @array;

   print $/;

   print join '' => @array;

   print $/;
  
   print "@array";

   print $/;

   {
     local $"='';
     print "@array";
   }

__DATA__
20130516,530,730
20130516,731,1100
20130516,1101,1200

[download]
Output: 
20130516,530,730
20130516,731,1100
20130516,1101,1200

20130516,530,730
20130516,731,1100
20130516,1101,1200

20130516,530,730
 20130516,731,1100        ##  note here
 20130516,1101,1200       ## and here

20130516,530,730
20130516,731,1100
20130516,1101,1200

[download]
Note:
I don't know how the OP is getting his/her input.
Hope this help in some way.
++ for toolic

If you tell me, I'll forget.
If you show me, I'll remember.
if you involve me, I'll understand.
--- Author unknown to me

In Section Seekers of Perl Wisdom