use strict;
use warnings;
use Data::Dumper;
my $file = 'BatmanFile.txt';
my @resultarray;
while( my $line = <DATA>)  {   
    #print $line;    
    chomp $line;
    my @linearray = split(":", $line);
    push(@resultarray, @linearray);
}
print "$_\n" foreach @resultarray;
__DATA__
Bruce:Batman:bat@bat.com
Santosh:Bhaskar:santosh@santosh.com