use constant DATE => 0;
use constant TIME => 1;
use constant TYPE => 2;
...

my @fields = split /,/, $response, 39;

if ($fields[TYPE] eq 'widget') ...