I recently fixed this, I actually doubted perl taking in all of those lines. The code now looks like this

while(<>){    
    if (/^[0-9]+, |Sent:/){
        push (@logs, $_);
    }# elsif (/Sent:/) {
    #    push (@dates, $_);
    #}
}

print $logs[0];
print $logs[1];
#print @dates;
[download]

The Comments are there because I tried making it one statement, so as it goes through the file it now keeps the logs and dates together. The until statement was my problem, I guess learning from mistakes is always the best. Thanks for the help!