#!/usr/bin/perl use strict; use warnings; my $var = "use neighbor 2001:504:0:4::6181:1"; ($var =~/(?<!use )neighbor[[:alpha:]-]* ([[:alnum:]\.-:]+)/) and do{ print $1; };
#11929 First ask yourself `How would I do this without a computer?' Then have the computer do it the same way.
In reply to Re: Quick Regex trouble
by kennethk
in thread Quick Regex trouble
by jrvd
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |