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

3 lines
82 B
Perl

use Set::IntSpan;
sub rangext { return Set::IntSpan->new(@_) . '' } # stringized