in reply to Re: Decompiling Regular Expressions
in thread Decompiling Regular Expressions
and just add#!/usr/bin/perl use warnings; use strict; use Regexp::Common qw/number/; use YAPE::Regex::Explain; print YAPE::Regex::Explain->new($RE{num}{real})->explain(); __END__ The regular expression: (?-imsx:(?:(?i)(?:[+-]?)(?:(?=[0123456789]|[.])(?:[0123456789]*)(?:(?: +[.])(?:[0123456789]{0,}))?)(?:(?:[E])(?:(?:[+-]?)(?:[0123456789]+))|) +)) matches as follows: NODE EXPLANATION ------------------------------------------------------------BLAH BLAH +BLAH
to my code.$thing=~/(?-imsx:(?:(?i)(?:[+-]?)(?:(?=[0123456789]|[.])(?:[0123456789 +]*)(?:(?:[.])(?:[0123456789]{0,}))?)(?:(?:[E])(?:(?:[+-]?)(?:[0123456 +789]+))|))) /
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Decompiling Regular Expressions
by Abigail-II (Bishop) on Apr 03, 2003 at 21:18 UTC | |
by shotgunefx (Parson) on Apr 03, 2003 at 21:22 UTC |