RosettaCodeData/Task/Range-extraction/Perl/range-extraction-3.pl

3 lines
86 B
Perl

use Set::IntSpan::Fast;
sub rangext { return Set::IntSpan::Fast->new(@_)->as_string }