Re: Extracting full digits from a range


The stupid question is the question not asked
	PerlMonks

Re: Extracting full digits from a range

by AnomalousMonk (Prior)

Log in
Create a new user
The Monastery Gates
Super Search

Seekers of Perl Wisdom
Meditations
PerlMonks Discussion

Obfuscation
Reviews
Cool Uses For Perl
Perl News
Q&A
Tutorials

Poetry
Recent Threads
Newest Nodes
Donate
What's New

on Aug 03, 2012 at 18:50 UTC ( #985310=note: print w/ replies, xml )

Need Help??

in reply to Extracting full digits from a range

One way:

>perl -wMstrict -le
"my $s = 'xxx 293F:2945 yy ff:103 zz';
 ;;
 my @ranges =
   map { eval join '..',  map hex,  split /:/ }
   $s =~ m{ [[:xdigit:]]+ : [[:xdigit:]]+ }xmsg
   ;
 ;;
 printf q{%x }, $_ for @ranges;
"
293f 2940 2941 2942 2943 2944 2945 ff 100 101 102 103
[download]