Select Code to Download

sub range_to_list {
    my( $max, $range ) = @_;
...
    $_ > $max and die "$_ out of range\n" for $lo, $hi;
    return $lo .. $hi;
}

C:\test>junk61
maxind=10
...

apples :one::two::three: