Select Code to Download

my @range = ([35, 55], [50, 60], [30, 40], [60, 65], [70, 80]);

...

use Data::Dumper;
print Dumper \@range;

$VAR1 = [
          [
...
            80
          ]
        ];