$ perl -MO=Concise -e'@a = ($x..$y)' ... - <1> ex-list lK ->7 3 <0> pushmark s ->4 - <1> null lKP/1 ->- 6 <1> flop lK ->7 d <1> flip[t6] lK ->7 4 <|> range(other->5)[t5] lK/1 ->c - <1> ex-rv2sv sK/1 ->d c <#> gvsv[*x] s ->d - <1> ex-rv2sv sK/1 ->6 5 <#> gvsv[*y] s ->6 ...