Re^2: find all numeric values from a string and join them

"A concept is valid in Perl only if it can be shown to work in one line."

perl -MRegexp::Common -E 'my $string = "EEH_ErrorCode=( 15, /* Compone
+nt */ 65 /* Error */)"; say join("|", $string =~ m/($RE{num}{int})/g)
+'
[download]

Dave

Comment on Re^2: find all numeric values from a string and join them Download Code