Hello pr33,
I am not clear on exactly what you are wanting to do. However, it looks as though you want to find every number immediately following the string “CentOs”. In which case, you don’t need a look-around assertion; just proceed as follows:
#! perl use strict; use warnings; use Data::Dump; $/ = undef; my $x = <DATA>; my @y = $x =~ / CentOs \s+ ( \d+ (?: \. \d+)? ) /mgix; dd \@y; __DATA__ data This is CentOs 6.5 version and CentOs 5.5 is not supported. The CentOS 6 has ability for LVM Snap backups where as CentOs 5.5 does +n't.
Output:
12:30 >perl 1117_SoPW.pl [6.5, 5.5, 6, 5.5] 12:30 >
Note the addition of the /i modifier to allow “CentOS” to match as well. Also, I have assumed that a version number should match even if it lacks a decimal component.
Hope that helps,
| Athanasius <°(((>< contra mundum | Iustus alius egestas vitae, eros Piratica, |
In reply to Re: How to find a string after matching a Keyword
by Athanasius
in thread How to find a string after matching a Keyword
by pr33
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |