- $self->{upload_date} = str2time $self->date;
- $self->{file_names} = $self->file_info->[0]->{file_names};
- $self->{file_lengths} = $self->file_info->[0]->{file_lengths};
+ $self->{upload_date} = str2time $self->date, 'UTC';
+ if ($self->file_info) {
+ $self->{file_names} = $self->file_info->[0]->{file_names};
+ $self->{file_lengths} = $self->file_info->[0]->{file_lengths};
+ }