perl -MData::Dumper -E '@a = (1, "1", 1, "1", "1o"); say "$a[2]"; say $a[4]+$a[3]; say Dumper \@a'
1
2
$VAR1 = [
          1,
          '1',
          1,
          1,
          '1o'
        ];