#!env perl
use strict;
use warnings;
use Devel::Peek;
use Data::Dump 'pp';
use v5.20;

say qq{"8" .. "C" generates strings "8" .. "9"};
dump_seq("8" .. "C");

say qq{"8" .. "9" generates integers 8 .. 9};
dump_seq("8" .. "9");

say qq{"-1" .. "2" generates integers -1 .. 2};
dump_seq("-1" .. "2");

say qq{"B" .. "C" generates strings "B" .. "C"};
dump_seq("B" .. "C");

say qq{"9" .. "7" generates nothing};
dump_seq("9" .. "7");

say qq{"C" to "A" generates strings "C" .. "Z"};
dump_seq("C" .. "A");

sub dump_seq { Dump($_) for @_; print "---\n\n"; }