logangha has asked for the wisdom of the Perl Monks concerning the following question:
Hi
I have this assignment
When a string comes with below content
01/LC-13/E10GbE-1,01/LC-14/E10GbE-1
It must take numbers 13, 1, 14 and 1, in order as indicated
And with this instruction is achieved
perl -le '@m = ( "01/LC-13/E10GbE-1,01/LC-14/E10GbE-1" =~ /./\w+-(\d+) +/\w+-(\d+)(?=,./\w+-(\d+)/\w+-(\d+))/); print for @m'
But when string comes with
01/LC-13/E10GbE-1
It must take numbers 13 and 1
And when I run my example does not work
$ perl -le '@m = ( "01/LC-13/E10GbE-1" =~ /./\w+-(\d+)/\w+-(\d+)(?=,./ +\w+-(\d+)/\w+-(\d+))/); print for @m'
It does not return anything
Which seems to be the trouble?
I don't know much about regular expressions
Regards.
Back to
Seekers of Perl Wisdom