Help for this page

Select Code to Download

Select or download this

my @tag_arr = qw(<NumData>1234567</NumData> <NumData>2345678</NumData>
+);
my @out_arr;
...
for ( @tag_arr ) {
    push @out_arr, ( split /(\d+)/ )[1];
}