You can just push the scalar array reference if you want the whole array:

push @ip_time, $entry;
[download]

Or you can skip the variable altogether and use:

push @ip_time, [ split /,/ ];
[download]

Here is the complete example with the slices:

use strict;
use Data::Dumper;
my $entry;
my @ip_time;
 
$_= "a,b,c,d,e,f";
$entry = [ split /,/ ];
push @ip_time, $entry;  # This does the whole array
 
$_= "g,h,i,j,k,l";
 
push @ip_time, [ split /,/ ];  # This does the whole array

push @ip_time,  [@{[ split /,/ ]}[0,5]];  # Slice it!
push @ip_time,  [(split /,/ )[0,5]];   # This works, too

$_= "m,n,o,p,q,r";
$entry = [ split /,/ ];
push @ip_time, [ @{$entry}[0,5] ];
 
print Dumper(@ip_time);
[download]

Update: fixed per wog's recommendation

It should work perfectly the first time! - toma